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PRÓLOGO 


Compõem esta publicação um SOFTWARE e um LIVRO. 


B IT— BASIC 

0 SOFTWARE acrescenta novas funções ao BASIC, tais como Cópia 
e Movimentação de Linhas* Busca de Constantes ou Listagem 
Controlada de Programas* sendo uma ferramenta de trabalho de 
extrema utilidade. 

Possibilita ainda o acionamento de comandos BASIC por 
intermédio de "Sintaxe Simpl if içada" , assim como o acionamento 
de "programas BASIC de uma linha". 

É TRANSPARENTE ao usuário do BASIC, que continua integralmente 
disponível, simultaneamente ao BIT-BASIC. 

A característica de ER60N0MIA foi buscada para os seus 
comandos, objetivando um mínimo esforço físico e intelectual 
em sua utilização* 


UMA PONTE RARA O ASSEMBLER 


0 LIVRO tem DOIS OBJETIVOS - 

0 primeiro è mostrar as técnicas de intercep taçãa e comunicação 
com o BASIC* via ASSEMBLER-Z8G, abrindo ao^ usuário a 
possibilidade de modificar e adaptar as suas funções* 

Isto ê feito a partir da própria DESCRIÇ20 DETALHADA DQ 
BIT-BASIC, que assim é apresentado como um software ABERTO AOS 
USUÁRIOS * 


0 segundo objetivo é constituir-se em 
ASSEMBLER, para os usuários de BASIC não 
esta linguagem» 

Partindo apenas do conhecimento de BASIC, 
conhecimento como base para comparações, o 
de conversar com o M5X na linguagem do Z-00 
principal . 


UMA PONTE PARA 0 
familiarizados com 

e utilizando este 
leitor será capaz 
, o seu processador 


A associação do LIVRO com o SOFTWARE teve como fundamento a 
busca da MUITIPL ICAÇSO DO CONHECIMENTO, e espero que possa 
contribuir para que os usuários do HSX, este versátil e 
singular equipamento, utilizem cada vez mais e melhor os seus 
recursos . 


0 AUTOR 


I NTRÜDUçau 


A abordagem utilizada para explicar o funcionamento do Z-BO e 
dp A5SEMBLER é a mais objetiva possível , suficiente _para a 
"Iniciação" nesta linguagem? procurando sempre explicações por 
ihtermédio de exemplos? com referências a conceitos já 
conhecidos de BASIC. 

Com isto é possível ui» aprendizado "Prático", con utilização 
imediata no desenvolvimento e análise "Daquelas" rotinas 
ASSEMBLER que você sempre desejou utilizar e entender. 

Os novos conhecimentos adquiridos, ou aqueles já possuídos, 
podem ser então consolidados pelo estudo do BIT-BASIC, o que 
proporcionará também um entendimento do funcionamento interno 
do BASIC. 

0 controle sobre o processamento é dinamicamente compartilhado 
pelo BASIC e pelo BIT-BASIC, estando ambos ativos todo o 
tempo. 

Tudo se passa como se o BASIC tivesse sido Modificado e os 
novos comandos a ele pertencessem. 

0 BIT-BASIC procura utilizar sempre que possível as funções do 
BIOS e do BASIC, com o que é obtido um alto grau de 
SIMPLICIDADE, CONFIABILIDADE e COMPATIBILIDADE. 

A "Administração da Tela" e a " Inclusão/Modificaçlo/Excluslo 
de Linhas BASIC" são exemplos disto. 

São deixados BYTES não utilizados entre as rotinas do programa 
BIT-BASIC para faciliar possíveis adaptações que vocf deseje 
efetuar (você poderá fazer estas adaptações diretamente e* 
"Linguagem de Máquina", se elas forem "Simples"). 

0 conteúdo dos BYTES estará sempre representado na forma 
HEXADECIMAL equivalente, o que será indicado pelo caráter * 
precedendo a sequência de dígitos Hexadecimais (por exemplo, 
#3A, HACE3) . 

Os Microcomputadores MSX HOTBIT e EKPERT possuem algumas 
diferenças, o que se reflete em diferenças correspondentes no 
BIT-BASIC para que rode era uma ou outra máquina. 

Este é o caso da disposição diferente das teclas no Teclado e 
também da disposição diferente dos bancos de memória RAM. 

Os termos técnicos em Inglês estão sempre traduzidos para 
seus significados equivalentes em Português, para facilidade 
de entendimento. 


CAPÍTULD I 
INTERCEPTANDO O 


BftS I C 


to 


I - INTERCEPTANDO O BASIC 


Ol — ROM & RAM, BIOS e? BASIC. 

□ seu microcomputador MSX possui módulos de memória 

permanente? cujo conteúdo permanece intacto mesmo com o 
aparelho desligada. 

Este tipo de memória é denominado RDM (Read Only Memory 
Memória Unicamente de Leitura)? e seu conteúdo nlo pode ser 
alterado nem mesmo com os recursos disponíveis no seu próprio 
equipamento. Assim? não há maneira de modificarmos os 

programas gravados em memória ROM. 

Nestes bancos de memória estão gravados dois programas básicos 
para o funcionamento do seu microcomputador. 

0 primeiro deles é o BIOS (Basic Input Output System ~ Sistema 
Básico de Entrada e Saída)? constituído ^por um conjunto de 
rotinas cujas principais funções sio dar início ao 

funcionamento da máquina e controlar as operapoes básicas de 
entrada e saída dos dados, de/para os periféricos conectados 
(Teclado? Tela? Gravador? Diskette, Etc.). 

0 segundo programa gravado na memória ROM è o Interpretador 
BASIC (Begginner^s All-purpose Symbol ic Instruction Code - 
Código Simbólico de Instruções de Final idade-geral para 

Iniciantes) i cujo propósito essencial é facilitar o uso dos 
poderosos recursos de processamento digital? gráfico e sonoro 
disponíveis no seu MSX. 

É ele que 11 i nterpreta\o "Programa BASIC" por voe? escrito, 
controlando sua execução. 

Apesar da legenda "Para Iniciantes", cunhada á época da 
definição de seus primeiros objetivos? o BASIC possui todos os 
recursos necessár ios para ser empr egado em ampla gama de 
aplicações avançadas? para várias áreas de atividades 

profissionais e de lazer. 

Quando voct liga □ microcomputador é automat icamente acionado 
o BIOS, que em seguida passa □ controle para o Interpretador 
BASIC (que, por sua vez, irá utilizar rotinas do BIOS) * 

Ambos os programas estão armazenados em memória do tipo ROM, e 
é por este motivo que nao ê necessário qualquer dispositivo 
externo para dar início ao funcionamento da máquina. 

0 seu MSX è ainda equipado com módulos de memória do tipo RAM 
(Random Access Memory ~ Memória de Acesso Aleatório) que Bode 
ser alterada e mantida sob controle do microcomputador . E 
aqui que são armazenados os programas e comandos escritos pelo 
usuário ou carregados a partir de meios externos. 

0 microprocessador Z-BO pode operar com endereços de memória 
entre #0QGQ e #FFFF , e a memória ROM ocupa as posiçoes 
compreendidas entre #0000 e I+7FFF. 


I - INTERCEPTANDO O BASIC 
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OS — GANCHOS 

COMO HODIFICAR OS PROGRAMAS RESIDENTES EM MEMÓRIA ROM ? 

Ainda que □ armazenamento neste tipo de memória apresente 
vantagens importantes, algumas vezes pode trazer dificuldades 
para a usuário. Tal é a situação em que precisamos alterar o 
funcionamento de programas nela residentes. 

Prevendo esta necessidade, as rotinas BIOS e o Interpretador 
BASIC efetuam desvios, em pontos estratégicos ,^pars endereças 
pertencentes à memória RAM, Nestes endereças são colocadas, no 
momento de inicialização da máquina, instruções de retorno 
imediato à ROM, com o que não é produzida qualquer alterado 
funcional nos programas originais* 

Com esta técnica, conhecida como GANCHD ÍHÜOK), abre-se ao 
usuário a possibilidade de alterar o conteúdo dos citadas 
endereços da RAM, sendo possível introduzir modificações 
funcionais nas rotinas do BIOS e do Interpretador BASIC, ainda 
que a codificação original permaneça intacta* 

Os endereços de memória onde estão armazenadas as instruções 
de desvio vão de #FD9A até ttFFCA (cinco Bytes para cada 
GANCHO) , 


03 — INTERCEPTANDO O BASIC, 

MODOS DE COMÜNICAÇaO COM 0 USUÁRIO. 

0 Interpretador BASIC possui dois modos de execução de 
Instruções, 

No modo DIRETO, cada linha digitada no teclado è interpretada 
e executada imediatamente após o pressionámento da tecla 
RETURN (este modo ê utilizado quando a linha não inicia por 
dígitas numéricos) * 

No modo INDIRETO □ Interpretador BASIC analisa e contraia a 
execução de um conjunto de instruções previamente armazenadas 
na memória RAM pelo usuário. Neste modo as linhas introduzidas 
no modo DIRETO, iniciando cada uma por um número compreendido 
entre 0000 e Ó55E9. Este conjunto de linhas constitui-se em 
um ^PROGRAMA BASIC", 


ROTINA E PONTO DE INTERCEPTAÇSO, 

Para cada linha entrada no modo DIRETO o Interpretador BASIC 
passa sempre pelas instruções armazenadas na ROM a partir cio 
endereço #4134. Este é o endereço inicial da rotina chamada 
MAIN-ENTRY (ENTRADA-PR1NCIPAL) , cuja primeira instrução é uma 
chamada (GANCHO) para o endereço #FFOC da RAM, 


I - INTERCEPTANDO O BASIC 
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Se desejássemos interceptar o Interpretador 
parai por exemplo, acionarmos o alarme 
aceitação de cada linha, poderíamos alterar 
a partir de #FFOC.' 


BASIC neste ponto 
( "BEEP " ) antes da 
o conteúdo da RAM 


Experimente aplicar os seguintes^ "POKES” 
"Ouça” o resultado (atençao - nao tapa 
BIT-BASIC "funcionando’ 1 ) : 


(nesta ordem)* 
este teste com 


e 

o 


POKE 6HFFOD,áHCO 
PÜKE &,HFFOE*tiHOO 
POKE iiHFFOC ,iHCD 


Isto faz com que, a cada passagem do Interpretador BASIC 
pela rotina MAIN-ENTRY, seja executada a instrução ASSEMBLER: 


CALL itOOCO 

correspondente á instrupao do Z— 80: 

#CD #C0 «00 

cuja função é "Chamar" a rotina "BEEP" do BIOS, instalada a 
partir do endereço #OOCO, 

A instrução seguinte, já presente na memória, é 
RETURN <#C9) 

com a qual é efetuado o RETQRN0_à "ROTINA PRINCIPAL" do BASIC, 
após a execução da rotina "BEEP". 

Para "Desligar" o desvio, faça "P0KE&HFFQCi&HC9" . 


Nao ê este, porém, o ponto utilizado para interceptaçao do 
Interpretador BASIC. 

Mais adiante, em #4164, é efetuada chamada ao .endereço #00AE, 
onde existe uma rotina do BIOS denominada PINLIN» cuja função 
à "Receber uma Linha Digitada até □ Pressionamento da Tecla 
RETURN ou das Teclas CDNTR0L+ST0P" tem #00AE há um desvio para 
#£3BF que é o endereço onde se inicia de fato esta rotina). 

A primeira instrução de PINLIN é uma chamada (GANCHO) ao 
endereço #FDDB da RAM (CALL «FDDB = #CD #DB #FD) . Em 

#FDDB, substituímos as instruções de retorna A ROM (RETURN = 
#C9) por um desvio para outro endereço da RAM, onde colocamos 
a rotina DESVIO do BIT- BASIC («FFD9Í. 

Este desvio é implementada pela instrução: 

JUMP #FFD9 (#C3 #D9 -FF. 

armazenada a partir do endereço #FDDB. 


CAPITULO I I 


O 


G I T 


G A S I C 
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II - ROTINA DESVIO 


Ol — ROTINA OE3V T O 

01.1 - OBJETIVO 

0 objetivo da rotina DESVIO do BIT-BASIC è interpretar cada 
linha digitada pelo usuário MSX no modo DIRETO e decidir se 
asta deve ser processaria pelo Interpretador BASIC ou pelo 
BIT-BASIC. 

Esta rotina executa também a tarefa de Comunicação 
(Transferência de Controle) do BIT-BASIC com o BIOS/BASIC. 

01. 2 - CARACTERÍSTICAS 

□ endereço escolhido para o início da rotina DESVIO é #FFD9, 
pertencente ao espaço I ivre existente após a ^rea ^e . GANCHOS 
entre os endereços #FFCA até #FFFE (endereços nao utilizados 

pelo BIOS/BASIC ) . t , . . AMTCC , 

A técnica utilizada para analisar o conteúdo da linha ANTES do 
Interpretador BASIC è acionar 'em seu lugar a rotina PINLIN, 
que devolve então o controle para a rotina DESVIO do BIT-BASIC. 
A utilização desta técnica se deve ao fato de nao existir um 
SANCHO instalado no final da rotina PINLIN. 


01 .3 

- ROTINA 

AS5EMBLER 

0010 


0RG 

#FFD9 

0020 

ft 

1 



0030 

DESVIO: 

POP 

BC 

0040 


CALL 

#23C2 

0050 


RET 

C 

0060 


PUSH 

HL 

0070 


RST 

#10 

00B0 


LD 

HL.DV09 

0090 


LD 

BC, #0004 

0100 


AND 

A 

0110 


CPIR 


0120 


POP 

HL 

0130 


RET 

NZ 

0140 

DV01 : 

POP 

BC 

0150 


LD 

BC, INICIO 

0160 


PUSH 

BC 

0170 

DV02: 

LD 

A,#XX (#FC/I 

0180 

DV03 : 

0UT 

<#A8> , A 

0190 


RET 


0200 

DV09: 

DEFB 

#3C , #5B * #3D , #EE 




#2F , #5B,#3D , #£E 

0010 

Instrui 

□ compilador ASSEMBLER 


ínstrupoes do 

BIT-BASIC a part 

0030 

Retira da PILHA D0 SISTEMA d 


(#FC/H0TBIT, #A0/EXPERT) 


(HOTBIT) 

(EXPERT) 


ira colocar 
do endereç 
endereço ai 


as próximas 
#FFD9. 
colocado pela 


primeira insiiucdu ua iuwmo i ‘ .. „ „ ' V « 

Com isto o próximo endereço da PILHA DO SISTEMA passa a 
apontar para a instrução imediatamente seguinte àquela 
que efetuou a chamada à rotina P INL IN . 


TI - ROTINA DESVIO 
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0040 Chama a rotina PINLIN da BIOS na mesma situação em que 
ela seria chamada pela rotina "MAIN-ENTRY" do BASIC, 
f#£3C2 é o endereço de sua segunda instrução» pois a 
primeira é a chamada ao BANCHD). 

Com isto é possível obter o controle APdS a digitação da 
linha e ANTES de sua interpretação pelo BASIC» analisando 
o seu conteúdo e retornando ao processamento normal % ou 
continuando o processamento sob controle do BIT-BASIC, 

0050 Retorna ao BASIC se as teclas C0NTR0L+ST0P foram 
acionadas durante a execução da rotina PINLIN (esta 
rotina liga o "Indicador de Carry-Status" caso isso 
ocorra ) ■ 

0 retorno será efetuado para a instrução imediatamente 
seguinte àquela que "chamou" PINLIN (veja Instrução 
0030), com □ que o processamento continua normalmente, 
como se o BIT-BASIC não existisse. 

00Ó0 Salva REG-HL na PILHA DG SISTEMA, o qual contém o 
endereço de início do BUFFER (Area de Trabalho), onde é 
colocada a linha digitada. 

Ao retornar da rotina PINLIN o REG-HL contém o endereço 
(menos 1) deste BUFFER, a partir do qual o BASIC efetua o 
processamento da linha digitada (o BIT-BASIC também 
processa a linha a partir deste endereço). 

0 BUFFER inicia em #F55E, e o REG-HL contém #F55D. 

É conveniente observar que antes da linha ser colocada no 
BUFFER citado os códigos digitados pelo usuária sao 
colocados em outra área de trabalho intermediária, chamada 
KEYCGDE -BUFFER (BUFFER do Teclado), de onde os caracteres 
sao retirados pela rotina PINLIN. Esta área será 
utilizada para outras funções do BIT-BASIC posteriormente 
descritas. 

0070 Obtém o próximo (Primeiro) caráter da linha digitada e □ 
coloca no REG-A. 

A instrução RST #10 ÍHD7) efetua uma "Chamada" 
(equivalente a um CALL ) ao endereço #0010 da ROM, onde 
está instalada a rotina CHRGTR do BIOS, cuja função è 
colocar no REG-A o "Próximo Caráter" armazenado no BUFFER 
de entrada ( #F55E) * 

Esta rotina posiciona o indicador CY - 1 caso a caráter 
seja numérica, e o indicador 2=1 se for encontrado o 
"Fim da Linha" (Caráter = #00). 

0 REG-HL contém o endereço do caráter recuperado. 

A primeira instrução da rotina CHRGTR é uma chamada 
(GANCHO) para o endereço #FF4B da RAM (a rotina CHRGTR 
inicia de fato no endereço #4òó6 da ROM , pois em #0010 
há um desvio para #3606, e neste endereço um desvio para 
# 4666 ) . 

0080 Carrega no REG-HL o endereço da tabela do BIT-BASIC de 
nome DV09, que inicia no endereço #FFF5 e possui 04 
caracteres . 
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It - ROTINA DESVIO 


0090 Carrega nc REG-BC a vaiar #0004 (tamanha da tabela DV09). 

0100 "Força' 1 o valor "Zero" ( desligado no indicador de 

Carry-Status (CY), para que o BASIC nao pense que as 
teclas CONTROL+STOP foram v pressionadas, caso seja 
efetuado o retorno na instrução 0130. . „ 

Í0 conteúdo do REG-A não è alterado por esta instrução.) 

0110 Procura um caráter igual ao contido no REG-A nos quatro 

3YTE5 í REG-BC = #04) a partir do endereço #FFr5 (REG-HL = 

tabela DV09) . . , 

Posiciona o indicador Z = 1 (Ligado) caso o caráter 

procurado seja encontr ada . 

(0 indicador CY não è alterado por esta instrução.) 

0120 Retorna ao REG-HL o endereça do BUFFER <#F55D), armazenado 
na PILHA D0 SISTEMA pela instrução da linha 0060. 

0130 Retorna ao BASIC e continua o processamento normal da 
linha, caso a seu primeira caráter não seja "<» C> - , 
í H0T-BIT) ou C, = , -** (EXPERT). 

Caso o primeiro caráter da linha digitada pelo ^usuário 
seja um destes, esta linha é identificada como um ^comando 
SIT-BASíC" sendo o controle passado para a instrução 0140, 
sem devolução ao Interpretador BASIC. 

0140 Retira da PILHA D0 SISTEMA o endereço de retorno à chamada 
original da rotina PINLIN pelo Interpretador BASIC. 
Isto é feito porque o BIT-BASIC fará o retorno para 
outros endereços do BASIC diferentes deste, dependendo do 
tipo de comando e das condições encontradas. 

0150 Carrega no REB-8C o endereço da rotina INICIO do 
BIT-BASIC (#7000). 

0160 Coloca na PILHA DO SISTEMA o endereço da rotina INICIO. 
0170 Coloca no REG-A o valor #FC (H0T-BIT) ou #A0 (EXPERT). 
01B0 Habilita (Torna "ativo") o bloco de memória RAM onde está 
armazenado o BIT-BASIC. 

Este módulo de memória ocupa os endereços de #i,0 2Xr,TÍÍ 
#7FFF, que são endereços ocupados PELD PROPRIQ 

Interpretador BASIC. (Como isto é possível??? Voe? verá 
em seguida, no item II-B.) 

0 valor #FC ou #A0 contido no REG-A é que determina a 
"Combinação" dos módulos de memória desejamos ativar. 
G valor #A8 indica á PP1 (veja Item II -2) "D QUE 
desejamos mudar, no caso a configuração dos blocos de 
memória. 

0190 A instrução RET equivale a um "Desvio Incondicional*' para 
o endereço armazenado no topo da PILHA DO SISTEMA. Como 
este endereço é o da rotina INICIO (aí colocado pela 
instrução 0160 - PUSH HL), o 2-90 desvia para esta 

rotina que efetua os primeiros procedimentos do 

BIT-BASIC. 


-*#*# As instruções das linhas 00160 a 00190 slo chamadas por 
diversas outras rotinas do BIT-BASIC, para efetuar 
transferi nc ias de endereços/controle com mudança de SLDT 
(bloco de memória ROM ou RAM). 


II - ROTINA INÍCIO 
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02 — ROTINA I M T r T O 

02.1 - OBJETIVO 

0 objetivo da rotina INICIO á dirigir o BIT^BASIC para a 
rotina apropriada? dependendo do tipo Mp comando recebido* 


02.2 - CARACTERÍSTICAS 


São os seguintes os comandos e funções correspondentes à cada 
caráter que, colocado na primeira posição da linha, faz com 
que ela seja tratada como um comando para o BIT-BASIC, 

HOTBIT 

< = #3C Rotinas para avançar /I istar página* 

C = #5B Rotina para retroceder I inhas/ I istar página* 

- =s #3P Rotina para pesquisar constante* 

. - #8E Rotinas diversas, conforme próximos caracteres, 

EXPERT 

/ - #8F Rotinas para avançar /I istar página, 

[ * #5B Rotina para retroceder Unhas/listar página. 

= ~ #3D Rotina para pesquisar constante. 

* = #2E Rotinas diversas, conforme próximos caracteres. 


A escolha dos caracteres está associada á facilidade de acesso 
às teclas correspondentes (teclas mais próximas á tecia 
RETURNK 

A existência do BIT-BASIC é transparente ao usuário HSX caso o 
primeiro caráter da linha não seja um dos ^anter i ormente 
descritos, ou seja: tudo se passa coma se ele nlo existisse, 
permanecendo todas as funções do Interpretador BASIC plenamente 
ativas. 

h exceção da rotina de comunicação ( " Interface** ) do BASIC com 
o BIT-BASIC (rotina DESVIO- já descrita), todo o restante 
deste programa fica instalado em memória RAM, a partir do 
endereço #7000, para evitar a redução do espaço de memória 
destinado aos “Programas BASIC", que ficam acima do endereço 
#8000 na RAM. 


Agora, uma pergunta : 

COMO É POSSÍVEL ARMAZENAR UM PROGRAMA A PARTIR DD 
#7000 SE TAL ENDEREÇO PERTENCE A MEMÓRIA DO TIPO 


ENDEREÇO 
ROM ??* 
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Na verdade* o microcomputador MSX possui também “bancos", de 
memória RAM instalados "paralelamente" à memória ROM, ocupando 
os mesmos endereços, para ser utilizado alternativamente a 
esta última (num dado instante somente uma delas pode estar 

"ativa"). , 7D „ 

Assim podemos fazer com que o microprocessador c bu, ao 
acessar um endereço compreendido entre #0000 e #7FFF , esteja 
se referenciando à memória ROM (onde estão os programas BIOS e 
BASIC), ou à memória RAM "Paralela" (onde podem ser colocados 
programas do usuário). 

à operação de "Comutação" ou "Chaveamento para ativar um ou 
outro bloco de memória é efetuada por um microprocessador 
especial, contido no seu MSX, denominado PPI (Programmable 
Peripheral Interface - Interface de Periféricos Programável ) , 
que pode ser acionado a partir do próprio 2—80 por intermédio 
de instruções especiais para esta finalidade (a^ instrução 
00180 da rotina DESVIO executa a operação de "trocar a 
memória ROM para RAM entre os endereças #4000 e #7FFF). 
A rotina INICIO fica armazenada de #7000 a #7046 na memória RAM 
"Paralela" à memória ROM ocupada pelo Interpretador BASIC. 


02.3 - ROTINA 

ASSEMBLER 

0220 

0RG 

#7000 

0230 ; 



02 A0 INICIO: 

LD 

A, (T19) 

0250 

CP 

#C3 

0260 

JP 

Z,CML02 

0270 

PUSH 

HL 

0280 A01 ; 

CALL 

RST10 

0290 

CALL 

MINUSC 

0300 

LD 

(HL) » A 

0310 

CP 

#00 

0320 

JR 

NZ.A01 

0330 

POP 

HL 

0340 

CALL 

RST10 

0350 

CP 

#XX 

0360 

JP 

ZjLISTAPG 

0370 

CP 

#5B 

0380 

JP 

Z, V0LTLIN 

0390 

CP 

#3D 

0400 

JP 

Z,VERCTE 

0410 

CALL 

RST10 

0420 

JP 

Z, RETOS 

0430 

JP 

CtLISTLIN 

0440 

CP 

#7A 

0450 

JP 

Z.NÜVGBAS 

0460 

CP 

#63 

0470 

JP 

Z.C0PM0V 

0480 

CP 

#6D 

0490 

JP 

Z (C0PM0V 

0500 

CP 

#3D 

0510 

JP 

Z, ENCERRA 

0520 

JP 

SINTAXE 


(#3C/HQTBIT - #5F/EXPERT ) 
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0220 


0240 


0250 

Q2óO 




0270 

0280 

0290 

0300 

0310 


0320 


0330 


0340 

0350 

Q3ó0 

0370 

0380 

0370 

0400 


0410 

0420 


Instrui c compilador ASSEfIBLER a colocar o programa 
rt Z~90" a partir do endereço #7000. 

Carrega no REG f\ □ conteúdo da "íroa dc Trabalhe* 1 do nome 
"TI?" (um BYTE)» cujo propósito é indicar que a rotina 
COPMQV» destinada a mover e copiar linhas BASIC» está 
"Sendo Executada 11 (veja detalhes na descrição desta 
rotina) * 

Compara o conteúdo do REG~A com #C3 ícacc afirmativo, 
posiciona o Indicador Z - 1). 

Desvia para a rotina CÍ1L02 caso o REG-A contenha #C3 
(Indicador z "Ligado"- Cópia de Linha "Em Progresso"). 

As linhas 0270 a 0330 t?m como objetivo converter para 
"minúsculas" todos os caracteres alfabéticos que tenham 
sido digitados como "maiusculos"» com a finalidade de 
facilitar o processamento da linha pelo BIT-BA5IC. 


atingida» retorna \ 
"A0r (linha 02B01 * 


Salva na PILHA o REG-HL (#F55D). 

Obtém» no REG-A* o próximo caráter da linha digitada. 
Converte caráter alfabético do REG-A para "minúsculo". 
Recoloca o caráter convertido no BUFFER ína posição 
apontada por REG-HL). 

Verifica se o BYTE obtida contém #00. Este valor é 
colocado pela própria rotina PINLIN para indicar a 
condição de "Fim da Linha' 1 * após o último caráter digitado 
F (no acionamento da tecla RETURN), 

Caso a condição de "Fim de Linha" não tenha sido 

para a instrução ASSEfIBLER de nome 
para obter e converter o próximo 

caráter , 

Após a conversão de todos os caracteres alfabéticas para 
"minúsculos"* restaura em REG-HL o endereço da primeira 

posição do BUFFER í #F55D ) » antes de iniciar o 

processamento da linha. 

Obtém» em REG-Aj o primeiro caráter da linha digitada. 
Compara o caráter contida em REG-A com #3C - 11 <" 

{ HOT-0I T ) ou #2F = V" (EXPERT ) . 

Se caráter "<* ou M /", desvia para rotina LI5TAFG (Lista 
Pág i na > . 

Compara REG-A com #5B * "C*\ 

Se Ti desvia para V0LTLIN (Retrocede Linha e 

Lista Página). 

Compara REG-A com #3D - f+ = " . 

Se desvia para VERCTE (Procura Constante), 


(caracteres já foram 
0110 ) . 

da 1 inha digitada 

it » 


para 


Se nao* assume que é 
na rotina DESVIO» linha 
Gbtém próximo caráter 
a função do comando iniciado por 
Desvia para â rotina RET02 caso tenha 
condição de "Fim de Linha" (o Indicador 
peia rotina RST10 nesta condição). 

A rotina RET02 devolve o controle do processamento ao 
Interpretador BASIC* que tratará a linha como um "ERRO DE 
SINTAXE" (experimente digitar " . " e acionar RETURN e veja 
o que acontece ) , 


sido 
Z é 


pesquisados 

ident if icar 

atingida a 
posic ionado 
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0430 


0440 

0450 


0460 

0470 

0480 

0490 

0500 

0510 

0520 


Desvia para a rotina LISTLIN (equivalente ao^oomando LIST 
do BASIC) caso o Indicador CY tenha sido Ligado pela 
rotina RST10 (isto significa que o primeiro digito após 
□ " . " é numérico) . 

Caso o Indicador CY não esteja ligadoi continua o 
processamento na próxima linha (0440). 

Compara REG-A com #7A = ’z". 

Se "z" desvia para a rotina NDV0BAS (posiciona 
para inclusão de novo programa BASIC após o 
corrente). „ „ 

Compara REG-A com #63 = c . 

Se "c" desvia para a rotina COPMDV (Copia/Move 
Compara REG-A com #6D = "® - . 

Se "m" desvia para a rotina COPMDV (Copia/Move 

Compara REG-A com #3D = " = . ■ 

g e s, = " desvia para a rotina ENCERRA (desativa o 

31 T-BAS I C ) . 

Se REG-A diferente de qualquer dos anteriores, desvia 
para a rotina SINTAXE (ComandosXProgramas com Sintaxe 
Simpl if içada ) . 


var iáveis 
programa 

Linhas) . 
Linhas) . 


II - ROTINA RST 10 


El 


03 — ROTINA RS T "■ O 

03.1 - OBJETIVO 

0 objetivo desta retina ò "'obter o próxima caráter da linha 
digitada** colocando-o no Registrador A, 

□ resultada é equivalente ao da rotina CHRGTR (RST #10) do 
BASIC, já descrita no item 11-01 .3, instrução 0070, 

03*2 - CARACTERÍSTICAS 

0 motivo pelo qual foi codificada uma nova é que a rotina 

CHRGTR está instalada na memória ROH que nao está "ativa 1 * 
durante a execução do BIT-BASIC, com o que seria necessário 
"Chavear/Deschavear *' os blocos de memória a cada novo caráter. 
Não seria uma boa técnica executar um grande número de vezes 
□s procedimentos relativamente “trabalhosos" de chaveamento. 

Identicamente á rotina CHRGTR, a rotina RST 10 “liga" o 
Indicador CY caso o digito obtido seja numérico, e “liga" o 
Indicador 2 caso tenha sido atingida a condição de “Fim de 
Linha" (Caráter #00). 

0 teste da condição de "numérico" é efetuado verificando se o 
conteúdo do REG-A está compreendido entre os vaiares #30 e 
#39, que correspondem aos caracteres numéricos de "O 4 até “9" 
na codificação ASCI 1^ (American Standard Code for Information 
Interchange - Padrã o Americano de Codificação para Troca de 
Informações ) * 

03.3 - CONDIÇÕES DE ENTRADA 

REG-HL - Endereço anterior ao do caráter a ser obtido* 

03. A - CDNDIÇCES DE SAIDA 

REG-HL - Endereço do caráter obtido (BUFFER). 

REG-A - Caráter obtido. 

Z - Fim da Linha ÍZ=1>. 

C,NZ - Caráter Numérico (CY-1, Z=0). 

NC,NZ - Caráter Nao-Numérico ÍCY^O, Z=0). 

03.5 - ROTINA ASSEMBLER 


0550 RST 10: 

INC 

HL 

0560 

LD 

A, (HL í 

0570 

CP 

#00 

0500 

RET 

2 

0570 

CP 

#30 

0600 

CCP 


0610 

RET 

NC 

0620 

CP 

#3A 

0630 

RET 

C 

0640 

GR 

A 

0650 

RET 



EE 
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0050 Barca 31 1 " no endereço contido nc RES-HL to par de 

registradores HL pas*=* a *pnnta^ o prbyrma 

caráter» o qual desejamos obter). 

(Por este motivo» para obtermos o primeiro caráter da 
linha, devemos colocar no REG-HL o "Endereço dc 8UFFER 
menos 1 " . > 

0560 Coloca no REG-A o conteúdo do BYTE apontado pelo endereço 
cont ido no REG-HL, , 

0570 Compara o conteúdo do REG-A com #00* que è o ^ código 

utilizado para indicar a condição de "Fim de Linha . 

0580 Caso a condição de fim de linha tenha sido atingida, ssta 
Instrução comanda ao Z-BO o Retorno á instrução 
imediatamente seguinte àquela que efetuou a chamada à 
rotina RST10 (com o 13 Indicador 2 33 ligado). 

0590 Corcpara REG-A com #30. 0 conteúdo do^ REG-A nao è 

modificado, porém os indicadores CY e Z sao posicionados 
como se tivesse sido subtraído do REG-A o valor #30 
(REG-A - #30). Isto resulta em : 


REG-A 

< 

#30 

C,NZ 

REG-A 

= 

#30 

NC,Z 

REG-A 

> 

#30 

NC,NZ 


(CY=1 - Resultado 
(2=0 - Resultado 
ÍCY=Q - Resultado 
(2=1 - Resultado 
(CY=Q - Resultado 
( 2=0 - Resultado 


Negativo) . 

Diferente de Zero). 
Não-Negativo > . 

Igual a Zero). 
Positivo) , 

Diferente de Zero). 


0600 CCF = Corcplement Carry Fiag - Complementa o Indicador de 

Transporte (CY). # _ _ w , 

"Complementa" ("Inverte 13 ) o valor do Indicador CY (se 
1 transforma em 0, e vice-versa - Liga/Desliga) . 

Esta operaçao é feita para atender às CONDIÇoES DE SAIDfl 

já mostradas, , , íliA „. 

RETORNA caso o Indicador CY esteja Desligado ( 0 
A combinação das instruções 0590 e 0600 faz com que esta 
condição seja verdadeira se REG— A í #30* 

Campara o REG-A com #3A, . . - n = Q n 

De forma semelhante ao explicado para a instrução 0390, 
sao posicionados os indicadores CY e 2. 

RETORNA caso a Indicador CY esteja "Ligado ícr Indicador 
Z estará "Desligado" neste caso), 

Esta condição será verdadeira se REG-A < #39. 

0 objetivo desta instrução ê "forçar" o posicionamento 
dos indicadores CY e 2» para indicar que □ cara-er 
contido no REG-A é "Nao Numérico" e é Diferente de #00 . 
Como estamos comparando REG-A com ele próprio, o 
conteúdo permanecerá o mesmo, porém os Indicadores de 
Estado ficarão : NC,Z (CY = 0, 2=1). ( 

íü Indicador CY sempre é posicionado em 0 por esta 
instrução, e o BYTE resultante é diferente de #00 pois 
esta condição já foi testada na instrução Gd/u.) 

0650 RETORNA à instrução imediatamente seguinte àquela que 
efetuou a chamada à rotina RST10. 


0610 

0620 

0630 

0640 
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— ROTINA MINUSC 

04.1 - OBJETIVO 

0 objetivo desta rotina é converter para “Minúsculo* o caráter 
contido no REG-A, no caso deste caráter ser "Alfabético" e 
"Maiúsculo" . 

04. 2 - CARACTERÍSTICAS 

D USX segue o padrSo "ASCII", no qual os caracteres 
“Alfabéticos Maiúsculos* correspondem aos valores hexadecimais 
compreendidos entre 841 (“A") e #5A (“2"), e os caracteres 

"Alfabéticos Minúsculos* correspondem aos valores hexadecimais 
comprendidos entre 861 (“a”) e #7A Cz"). 

Portanto, podemos observar que entre cada caráter alfabética 
maiúsculo e o seu caráter minúsculo correspondente existe uma 

“diferença" de #80. 

Assim, se "Somarmos 820" ao "Valor Hexadecimal"^ que 
corresponde a um caráter “Maiusculo", obteremos o "Valor 
Hexadec imal ' do caráter "Minúsculo" correspondente. 

Por exemplo : 

A = 841 

a = 841 + 820 = 861 
2 = 85A 

z = 85A + 820 = 87A 

04.3 - C0NDIÇ0ES DE ENTRADA 
RE6-A - Caráter a ser convertido 

04.4 - CONDIÇÕES DE SAÍDA 
REG-A - Caráter já convertido 

04.5 - ROTINA ASSEMBLER 

0680 MINUSC: CP 841 

0690 RET C 

0700 CP #5B 

0710 RET NC 

0720 ADD A, 820 

0730 RET 

0680 Compara REG-A com #41 ("A"). 

0690 RETORNA se REG-A < 841 (caráter não é "Alfabético 

Maiusculo" ) . 

0700 Compara REG~A com #5B (85A = "Z " ) . 

0710 RETORNA se REG-A maior ou igual a 85B (caráter nao é 
"Alfabético Maiusculo*). 

0720 Soma #20 ao REG-A (transforma caráter 

Alfabético "Maiúsculo" em "Minúsculo" ) . 

0730 RETORNA à instrução imediatamente seguinte àquela que 
efetuou a chamada à rotina MINUSC. 


II - ROTINAS CALL /JUMP 


2<t 


PíC * X 


;ptl_l_/ 3 UMP 


05.1 - OBJETIVO 

□ nbietivQ da rotina CALL é efetuar "Chamadas” a rotinas do 
Interpretador BASIC , as quais não sio diretamente acessíveis a 
oartir dc 8IT-BASIC em razão de nao estar ativa a «emdria RDM 
onde elas estão instaladas (neste momento, os endereços #AOOO a 
ÍÍ7FFF correspondem à memória RAM, ativada pela rotina DESVIO). 


0 objetivo da rotina JUMP é 
pertencentes ao Interpretador 
considerações efetuadas para 


efetuar "Desvio" para 
BASIC, sendo válidas 
a r ot ina CALL . 


endereços 
as mesmas 


05.2 - CARACTERÍSTICAS 


A codificação das duas rotinas está^ 
interligadas aos "Pontos de Entrada 
ÜV03 da rotina DESVIO. 


"associada" e ambas estão 
< "Entry-Points" ) DV02 e 


05.3 ~ CONDIÇÕES DE ENTRADA 

(CALL) REG-BC - Endereço da rotina chamada 
(CALL) PILHA DO SISTEMA - Endereço de retorno 
( JUMP ) REG-BC - Endereço da rotina de destino 


05.5 - CONDI ÇGES DE SAÍDA 

(CALL) Desvio para o endereço contido na PILHA DO SISTEMA 
(JUMP) Nãa há retorno 


05.6 - ROTINA A5SEMBLER 


0760 CALL: 
0770 

0760 JUMP: 

0790 

0600 


LD DE,DV02 
PUSH DE 
PUSH BC 
LD A,#XX 
JP DV03 


( ÜFO/HOTBI T - #A0/EXP£RT ) 


0760 Carrega no REG-DE o endereço do "Ponto de Entrada’ DV02 
da rotina INICIO (#FFF0>, que corresponde à instrução 
"LD A , # X X " da linha 0170. „„ 

0770 Armazena o valor contido em REG-DE <#FFF0) na PILHA DD 
SISTEMA « 

0780 Armazena o vâlor contido em REG-BC na PILHA D0 SISTEMA, 
(Antes de utilizarmos a rotina CALL au a rotina JlJnP, 
devemos colocar no REG-BC o endereço da rotina a ser 
chamada. ) 

0790 Carrega no REG-A o valor ÍIF0 ÍHDTBIT) ou #A0 1EXPERT). 

0800 Desvia para o ponto de entrada DV03 da rotina INÍCIG. 


II - ROTINAS CALL/JUMP 
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*#*# A seguir repetiremos o funcionamento das instruções da 
rotina INICIO utilizadas para concluir as funções CALL e JUMP. 


0100 QUT (#A8)?A - 11 Reativa" o bloco de memória ROM onde 

está o Interpretador BASIC. 

0190 RET - A instrução Assembler "RET" IZ-BO = #C9> faz com 

que o "Programa Z-80' 1 efetue um desvio para o último 
endereço armazenado na PILHA DG SISTEMA (passando a 
apontar para o próximo endereço da PILHA). 

0 ultimo endereço que colocamos na PILHA foi aquele 
contido no REG-BC (veja linha 0780 )? que é exatamente o 
endereço inicial da rotina com a qual desejamos nos 
comunicar . 

Caso^estejamos passando por este ponto do programa era 
função de uma chamada á rotina CALL (veja Instruções 0760 
e 0770)? □ endereço seguinte da PILHA é o endereço de 
DV02 <#F FFOK 


**** Como toda rotina acionada via CALL "termina" sempre com 
uma instrução RETi sempre haverá um desvio para DV02 
após ter sido executada a ^rotina chamada? quando serão 
então executadas as instruções das linhas 0170 a 0190? 
cujo funcionamento nesta situação repetimos a seguir : 


0170 Carrega em RE6-A o valor #FC/#A8. 

0180 Reativa □ bloco de memória RAM onde está instalado o 
BIT-BASIC, 

0190 Desvia para o áltimo endereço armazenado na PILHA. 
A "chamada" à rotina CALL do BIT-BASIC è sempre efetuada 
por uma instrução "CALL" de ASSEMBLER. 

Portanto? quando é executada esta instrução RET? é 
efetuado um desvio para a "Instrução Imediatamente 
Seguinte Aquela que Efetuou a Chamada á Rotina CALL"? cora 
o que é completado o ciclo de chamada. 

Mo caso da rotina JUÍ1P ? que é acionada por uma instrução 
"JUMP" do 2^00? nada é colocado na PILHA? já que nao será 
efetuado retorno. 


RESUMIDAMENTE : 

1 - Ac i onamento da rotina CALL (em qual quer ponto do 

BIT-BASIC). 

2 - Armazena endereços "De retorno" e "Da rotina chamada" na 

PILHA D0 SlSrEMA (rotinas CALL/JUMP). 

3 - "Ativa" memória ROM onde está o BASIC e desvia para a 

rotina chamada (via rotina DESVIO), 

4 - Executa a rotina chamada. 

5 - "Reativa" a memória RAM onde está o BIT~BASIC (via rotina 
DESVIO) . 

- Retorna ao ponto de partida (via rotina DESVIO). 
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06 — ROT I PJA RETO 1 


06.1 ' OBJETIVO 


0 objetivo desta rotina é retornar ao 
“Passando uma Linha de Comando' , como se 
digitada via teclado pelo usuário. 


Interpretador 
ela tivesse 


3ASIC 

sido 


06.2 - CARACTERÍSTICAS 

SIMULANDO UMA LINHA DE COMANDO PARA 0 BASIC, KEY-CÜDE 9UFFER 

Esta técnica é utilizada para fazermos com que o 

BASIC execute instruções comandadas pelo programa BI I BAB1L 

f nnr exemplo, FILES, LOAD , LIST, etc.). _ t + 

Ó retorna é efetuado ao BASIC para o inicio 
u A Ifg_£f47RY , num ponto "Anterior á Chamada da Rotina P1N LIN ‘ 

Os comandos desejados são colocados em rrinTrnq d - 

rnnc-Q! irrPP ( "áRFfi DE TRABALHO “ PARA lÚDIGOS 

TECLADOS"), ou simplesmente KEYBUFFER ( BUFFER 00 ’ 

que é onde são colocados os caracteres correspondentes 
teclas que voc? aciona em seu microcomputador. t 

Esta área, com o tamanho de AO BYTES, está colocada entre os 
endereços #FBFO e #FC17 e é controlada por dois dados 

í GETPNT/PUTPNT) que sao atualizados cada vez que um caráter e 
ai colocado ou retirado. 

GETPNT E PUTPNT 

0 primeira dado de controledo BUFFER DO TECLADO é o "Endereço 

do Primeiro Caráter Digitado", que ^ GFT^OINT PoSto 
endereços **F3FA/#F3FB e tem o nome de GETPNT tGET P01NF Kanto 

□ e seSÍndo a dãdo é o "Endereço A P 6s ° # ^^ F3 ^ rá ‘ er te S Í9 o ta ^è 
que fica armazenado no endereços #F3F8/#F3F9 e tem o nome 

de PUTPNT (PUT POINT - Ponto de Salda). ■■ Va , io » 

- Se GETPNT = PUTPNT, significa que o BUFFER está vazio . 

- Se GETPNT # PUTPNT, significa que "há caracteres digitados e 

ainda não processados no BUFFER". . 

- A cada caráter entrado PUTPNT é incrementado de 1, e a cada 
caráter retirado GETPNT é incrementado de 1 (de t . f °™ a 
"circular", de maneira que nunca sao ultrapassados os limites 
do BUFFER e número máximo de caracteres armazenados 

seja AO) . „ . , . . 

A rotina PINLIN, cuja função é Obter uma Linha 
RETURN ou CÜNTRÜL+STOP (veja Item 01), executa 
retirar do BUFFER os caracteres lá existentes, 
encontrado um caráter que represente o fato 
pressionada a tecla RETURN (o caráter utilizado 
áOD) ou um caráter que represente o pressionamento 
CONTROL+STOP to caráter utilizado é #03). 


Digitada até 
a tarefa de 
até que seja 
de ter sido 
para isto é 
das teclas 
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SIMULANDO UMA LINHA DE COMANDO 

Para simularmos ao BASIC a existência de uma linha de comandos 
a ser processada, como se ela tivesse sido introduzida via 
teciadp, o texto correspondente aos comandos desejados deve 
ser colocado no BUFFER DO TECLADO e as variáveis GETPNT e 
FUTPNT devem ser posicionadas respect i vamente no "Primeiro" e 
M úítimo Caráter Mais t H deste texto, desviando-se em seguida 
para o BASIC no ponto de chamada da rotina PINLIN, que fará a 
retirada da linha a partir da BUFFER e a entregará ao 
Interpretador BASIC para processamento, 

Ç6TE É 0 PROCEDIMENTO EFETUADO PELA ROTINA RETOI * PORÉM COM 
UMA VARIAÇ20 QUE DESCREVEMOS EM SEGUIDA, 

A linha que desejamos passar ao BASIC è colocada na Tela do 
monitor ou do aparelho de TV conectado ao microcomputador. 
Isto pode ser feito com a utilização da rotina CHPUT 
(CHARACTER PUT - Saída de Caráter - Envia um caractere ao 
vídeo - CALL #OOA£), ou da rotina OUTDO (DUT DO - txecuta 
Saída - Envia um Dado ao Último Dispositivo Referenciado - RST 
#1B - CALL #0018), 

Efn seguida, com o CURSOR posicionado sobre a linha colocada na 
Tela, utilizamos a técnica anteriormente ^descrita para 
simularmos à rotâna P INL IN apenas e tão somente o 
pressionamento da tecla RETURN. Ou se ja , colocamos no 
KEYBUFFER o caráter #0D íRETURN), fazemos a variável GETPNT 
apontar para este caráter, fazemos a variável PUTPNT apontar 
para o BYTE seguinte, e desviamos para a rotina PINLIN (é 
como se tivesse sido acionada a tecla RETURN sobre uma linha 
da Tela). 

ADMINISTRAÇ2D DA TELA 

Na verdade, existe um terceiro componente envolvido na captura 
de dados para processamento pela BASIC que é a função 
encarregada da "Administração de Tela 1 '. 

Quando existem várias linhas apresentadas, podemos movimentar 
o CURSOR livremente para qualquer posição e acionar a tecla 
RETURN em qualquer ponto. 

Isto feito, a função de “Administração de Tela” irá procurar 
“Para Frente 1 * e “Para Trás" para descobrir onde “Começa 11 e 
onde "Termina 11 a linha sobre a qual o CURSOR está posicionado. 
Em seguida, é então passada ao Interpretador BASIC esta linha, 
via KEYBUFFER e via PINLIN conforme já descrita. 

Este modo de funcionamento, extremamente prático, no qual 
podemos correr 1 i vr emente toda a tela , é denominado FuLL 
SCREEN - Tela Completa". 

Na verdade, a linha que aparece na tela está armazenada em um 
bloco de memória RAM "Especial", destinada sxclusivamente para 
este fim, denominada VRAM (VIRTUAL RAM - RAM Virtual). Ela é 
administrada por um outro microprocessador especial contido no 
seu MSX chamado VDP (VIDEO DISPLAY PROCESSDR - Processador de 
Apresentação em Vídeo), o qual também é acessível via 1 B0, 
existindo diversas rotinas do BIOS já prontas para efetuar 
este acesso. 


SB 


II - ROTINA RET01 


da tecla 
da tela 
que esta 
Tela" e 
e rotina 


ROTINA RETOl 

A rotina RETOl, portanto, simula o acionamento 
RETURN, com o CURSOR já posicionado sobre uma linha 
que contém os comandos que desejamos executa r, com o 
linha será lida pela funpao de Administração de 
passada ao BASIC para processamento, via KE r HUr rfcn 
PINL1N. 

Esta rotina possui ainda um outro Ponto de Entrada 
TEntry-Point) denominado RETOS que serve para ,fÍ.í^ la BASIC 
acionamento de “outras teclas de controle sobre a linha BASIC 

existente na tela. _ . . i “ptri -v h**. 

Por exemplo, simular o pressionamento das teclas CTRL U ’ 

que executa a funcao de "Apagar Toda a Linha Sobre a Qual 
o CURSOR", utilizada pela rotina do BIT-BASIC que Copia e 
linhas ÍCOPMOV1. 


está 

Move 


06.3 - CONDI çQES DE ENTRADA 

CURSOR posicionado na Tela sobre a linha desejada 

06.4 - ROTINA AS5EMBLER 


0830 RETOl : 

0840 RET0E: 

0850 

0960 

0970 

OBBO 

0890 

0900 


0830 Carrega 
0040 
0B50 


LD 

HL,#OOOD 

LD 

<#FBFG) , HL 

LD 

HL,#FBF0 

LD 

< #F3FA) , HL 

INC 

HL 

LD 

(#F3FB) ,HL 

LD 

BC, #4 137 

JR 

JUMP 

#G00D 

em REG-HL 


(#0D indica para 
IRN - i/p ia APENDICE 0 
KEYBUFFER, 


P1NLÍN o 
6 ) . 

O valor 


que corresponde ao 
“Primeiro Caráter da 


0060 

0870 

0BB0 

0890 


0900 


Coloca em #FBF0, endereço inicial do 
contido no REG-HL í #000d ) . 

Carrega no REG-HL o valor #FBFG, 
endereço do KEYBUFF onde colocamos o 

, % ■ M 

Armazena o valor de REG-HL na variável GETPNT (#F3FA ) . 
Incrementa REG-HL de uma unidade (posicao seguinte ao 

Armazena o valor de REG-HL na variável PUTPNT (#F3F8). 
Carrega em REG-0C o valor #4137, que é o endereço da 
segunda instrução da ENTRADA PRINCIPAL (MAIN-ENTRY ) do 
Interoretador BASIC (a primeira é uma chamada ao GANLHU de 

Desvia para a rotina JUMP, que fará a Ativacao do bloco 
de memória onde está o Interpretador BASIC e fará o desvio 
para a ENTRADA PRINCIPAL, onde será efetuada a chamada a 
rotina PINLIN, e tudo acontecerá conforme já descrito. 


II - ROTINA RET03 


e? 


OV — ROTINA RET 03 


07.1 - OBJETIVO 

0 objetivo desta rotina é passar ao BASIC uma linha de 
comandos para processamento, porém SEM APRESENTAR ESTA LINHA 
NA TELA de seu monitor ou TV, nao sendo, portanto, de 
conhecimento do usuário (com a técnica utiLizada na rotina 
RET01 a linha de comandos è apresentada na tela)* 


07.2 - CARACTERÍSTICAS 

A rotina PINLIN retira os caracteres do KEYBUFFER e os coloca 
em outra "Ãrea de Trabalho" íBUFFER) que inicia no endereço 
#F55E , a partir da qual o BASIC finalmente efetua o seu 
processamento (caracteres colocados exatamente como forant 
digitados ) . 

G tamanho desta área de trabalho è de "255+3% e é por este 
motivo que nlo conseguimos passar ao Interpretador BASIC linhas 
maiores do que 255 posiçoes. 

A rotina RET03 coloca a linha de comandos desejada diretamente 
neste BUFFER, como se tivesse sido entrada via PINLIN (e demais 
procedimentos já descritos), e a entrega ao Interpretador BASIC 
no ponto M imediatamente após o^ponto de chamada a PINLIN" para 
que seja processada (instrução "R5T #H) M ) cuja função é 
"Retirar do Buffer um Caráter da Linha Digitada", colocando-o 
em RE6“A e posicionando os Indicadores de Estado CY e 2 testa 
instrução fica no endereço #4173 da ROM e é "pulado" □ teste 
efetuado após a rotina PINLIN para verificar se foram 
pressionadas as teclas CONTRGL+STOP ) . 


07-3 - CÜNDIÇOES DE ENTRADA 

Linha a ser passada ao Interpretador BASIC armazenada no 
BUFFER <#F55E). 

LINHA A SER PASSADA AO BASIC ARMAZENADA NO BUFFER t#F55E>. 


07.4 - ROTINA ASSEMBLER 

0930 RETOS: LD HL,#F55D 

0940 LD BC, #4173 

0950 JP JUflP 

0930 Carrega no REG-HL o valor #F55D, que é □ "Endereço da 
BUFFER DO BASIC menos 1% 

0940 Carrega no REG-BC □ valor #4173, que é o endereço do 
BASIC h Após a Chamada da Rotina PINLIN", 

0950 Desvia para o endereço #4173 do BASIC, via rotina JUMP, 
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II ~ ROTINA RET04 


OS " ROTINA RET í_í *+ 


08.1 - OBJETIVO 

0 abietivo desta rotina é efetuar o retorno, em situação 
SoSff "S ponto inicial da "ENTRADA PRINCIPAL" í "MAIN-ENTRY" ) 
db Interpretador BASIC? onde será aceita uma nova linha de 
comandos (via rotina PINLIN) a qual passará por todos os 
procedimentos de interceptaçio e verificapao já descritos. 


08.2 - CARACTERÍSTICAS 


0 retorno é efetuado para o enderepo #4137, 
instrupão da ROTINA PRINCIPAL (a primeira 
GANCHO de #FF0C>. 


que é a segunda 
ê uma chamada ao 


0B.3 - ROTINA ASSEMBLER 


0980 RET04; CALL #0156 

0990- LD BC, #4 137 

1000 JP JUMP 


0980 Efetua chamada á rotina do BIOS denominada KILBUF ^ K I LU 
BUFFER - Zera Buffer), encarregada de Limpar o 
KEYBUFFER (BUFFER do Teclado), o que é feito tornando 
"Iguais" os valores de GETPNT e PUTPNT . 

REG — BC o valor 
início da ROTINA 


0990 Carrega no 
endereço de 
BASIC. 

1000 Desvia para o endereço #4137, 
descritos para a rotina JUMP. 


#4137, que corresponde ao 
PRINCIPAL do Interpretador 


conforme procedimentos já 


II - ROTINA ENCERRA 
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GS> — ROT X MA ENCERRA 


09,1 - OBJETIVO 

0 objetivo desta rotina é "'encerrar*’ o BIT-BASIC» desativando 
os procedimentos de intercep t ação do I nterpretador BASIC. 


09.2 - CARACTERÍSTICAS 

Conforme já descrito no ítem^ 1-03^ a interceptaçao è 
implementada introduzindo-se um "desvio 11 para o BIT-BASIC a 
partir do GANCHO instalado em #FDDB, que à chamado no início 

da rotina PINLIN. 

Este desvio è feito para a rotina DESVIO pela instrução : 

JP #FFD9 (#C3 #D9 #FF ) 

colocada a partir do endereço #FDDB . 

Para desativarmos este desvio basta substituirmos o código 
#C3 (JUMP) por #C9 (RET), com o que será restaurado o retorno 
normal ao ponto de chamada do GANCHO na ROM, 

Com isto o BIT-BASIC passa a ficar "Inativo" (ainda que suas 
instruções permaneçam na memória), 

Esta função foi prevista em razao de que podemos desejar rodar 
outro programa que ocupe endereços já ^ utilizados pelo 
BIT-BASIC. Neste caso sua codificação seria "Modificada 1 e» ao 
retornarmos ao BASIC % poderiamos obter resultados inesperados 
já que haveria desvio para uma combinação Imprevisível de 

instruções , . 

(Esta condição NfiO SE APLICA para programas^ BASIC pois estes 
sempre ocupam endereços acima de #8000 * nao utilizados pelo 
BIT-BASIC. ) 


09.3 - ROTINA ASSEMBLEft 

1030 ENCERRA: LD A,#C9 

1040 LD (#FDDB> ,A 

1050 JR RET04 

1030 Carrega o valor #C9 no REG-A (Código Instrução RET do 
2 - 00 ) . 

1040 Carrega #C9 (RED no endereço #FDDB. 

1050 Desvia para o início da ROTINA PRINCIPAL do BASIC» via 
rotina RET04» para a continuidade normal de sua atividade. 
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II - ROTINA FARM 


IO — ROTINA R«RM 
10.1 - OBJETIVO 

0 objetiva desta rotina é capturar um parâmetro numérico ã 

partir da "Linha de Comando BIT-BA5IC", converter este valor 

para “Binário 11 e colocar este valor no REG-DE, 

10. E - CARACTERÍSTICAS 

Por exemplo* se a linha de comando para o BIT-BASIC contém os 
caracteres ,, <<1£?9” nas suas primeiras posiçoes (o que 
significa que desejamos “Listar o programa a partir da linha 
1879“), a rotina FARM fará a conversão do número 1879, 
armazenado em QUATRO BVTES no BUFFER (ASCII) para o "Número 
Binário 11 equivalente armazenado em DQIS BYTES. 

- ASCII : 1879 = #31 #38 #37 #39 (um BYTE P/cada digito) 

- BINÁRIO : 1879 = #0AFF (dois Bytes), 

10.3 - CONDI COES DE ENTRADA 

REG-HL - Endereço do primeiro caráter do parâmetro numérico 
10. A - CONDIÇÕES DE SAÍDA 

REG-DE “ Valor Binário do Parâmetro Numérico 

REG-HL - Endereço do Última Caráter do Parâmetro Numérico 

C - Parâmetro numérico inválido (maior que 65585) 

NC - Parâmetro numérico válido 

Z - Parâmetro é "Zero" 

NZ “ Parâmetro diferente de Zero 

10.5 - ROTINA ASSEJ1BLER ÍPARMÍ 


1080 PARM: 

CfiLL 

NUMX 

1090 

DEC 

HL 

1100 

REI 

C 

1110 

LD 

fl.E 

11S0 

0R 

D 

1130 

RET 



Í0B0 Efetua chamada à rotina NUMX a seguir descrita, que efetua 
a captura do parâmetro numérico. 

1090 Diminui REG-HL de uma unidade. 

0 objetivo deste procedimento é "Voltar atrás" o último 
caráter lido pela rotina NUMX , ficando REG-HL posicionado 
sobre o "Último Caráter do Parâmetro Numérico" obtido. 

1100 RETORNA caso o parâmetro numérico nao seja válido (o 

Indicador de Estado CY é "Ligado" pela rotina NUMX se 

esta condição ocorrer). 

1110 Carrega o conteúdo de REG-E em REG-A. 

1120 Compara o conteúdo de REG-A com o conteúdo de REG-D, na 

modalidade 0R, coloca □ resultado em REG-A e posiciona os 
Indicadores de Estado CY e Z para mostrar se n conteúdo 
de REG-DE è igual ou diferente de #0000. 

1 130 RETORNA ao ponto de onde foi chamada a rotina FARM, 


II - ROTINA PARfl 
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10.6 - ROTINA AS5EMBLER (NÜP1X) 


1160 

NUnX: 

LD 

DE, #0000 

1170 

A04: 

LD 

BC, #0000 

1180 


CALL 

RST10 

1190 


RET 

Z 

1200 


RET 

NC 

1210 


PUSH 

HL 

1220 


SUB 

#30 

1230 


LD 

C,A 

1240 


LD 

H,D 

1250 


LD 

L,E 

1260 


ADD 

HL, HL 

1270 


ADD 

HL, HL 

1280 


ADD 

HL, HL 

1290 


ADD 

HL, DE 

1300 


ADD 

HL, DE 

1310 


ADD 

HL, BC 

1320 


EX 

DE, HL 

1330 


LD 

HL,#FFF5 

1340 


R5T 

#20 

1350 


POP 

HL 

1360 


RET 

C 

1370 


JP 

A04 

1160 

Carrega 

no REG 

-DE o valor #0000 ("Inicializa" HE6-DE para 


pôster iormente 

somar os digitos numéricos). 

1170 

Carrega 

no REG 

-BC o valor #0000. 

1180 

Obtém caráter 

a partir do BUFFER, 

1190 

RETORNA 

para a 

Instrupão 1090 caso tenha sido atingida a 


condipão 

de "Fim de Linha". 


1200 RETORNA para a Instrução da linha 1090 casa o dígito 
obtido nao seja numérico (isto indica a condição de "Fim 
do Parâmetro Numérico 11 ). 


1210 "Salva" na PILHA DO SISTEMA o endereço contido no REG-HL, 
pois este Registrador será utilizado em seguida para 
"calcular" d valor binário do numero. 

1220 Subtrai #30 do Acumulador (REG-A), Com isto passamos a 
ter no REG-A um conteúdo compreendido entre #00 e #09 (já 
que os caracteres numéricos ASCII correspondentes vão de 
#30 a #39). 

Este conteúdo corresponde á representação "Binária" dos 
dígitos numéricos de 0 a 9. 

1230 Carrega o conteúdo do REG-A no REG-C. Assim o REG-fíC 
passa a conter o "Valor Binário" do último caráter obtido 
í#00XX pois o REG-B contém #00 ) , 

1240 Carrega no REG-H o conteúdo do REG-D, 

1250 Carrega no RE6-L o conteúdo do REG-Ê, 

Com as instruções das linhas 1240/1250* REG-DE é 
"Copiado 11 para REG-HL (o REG^DE é utilizado nesta rotina 
para armazenar o "Sub-íotal" dos dígitos numéricos já 
processados) . 
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**** As instruções das linhas 1260 a 1310 fazem com que o 
‘Sub-Total' 1 (Binário) contido no REG-HL seja multipl içado 
por dez i e cosi que seja somado o valor binário do novo 
caráter numérico obtida (contido no REG-BCI. 

Com a repetição deste procedimento» ao final da rotina» 
teremos acumulado no REG-DE os valores binários dos 
diversos dígitos que compõem o parâmetro numérico» cada 
qual multiplicado pelo "fator de dez" correspondente à 
sua posição relativa (o caráter mais à direita 

multiplicado por 1» o seguinte á sua esquerda por 10, o 
seguinte por 100, e assim ppr diante). 


1260 


1270 

1280 

1290 

1300 

1310 

1320 


1330 

13A0 


1350 


copiado 


último caráter 


“Sub -Total" dos 


1360 


1370 


Soma o valor contido no REG-HL ao próprio REG-HL 
( equivale a mui tipi icar por dois o valor contido no 
REG-HL) . 

Dobra o valor de REG-HL. 

Dobra o valor de REG-HL. 

Soma no REG-HL o valor inicial do próprio REb-HL, 
para o REG-DE pelas instruções 12A0/125Q, 

Soma novamente REG-DE no REG-HL. 

Adie iona no REG-HL o valor b i nár io do 
obtido. 

Troca os conteúdos de REG-HL e REG-DE. 

Neste ponto REG-DE passa a conter □ 
dígitos processados até o momento. 

Carrega em REG-HL ovalor#FFF5=655E5. 

Efetua chamada à rotina DCOMPR que compara o valor 
contido no REG-HL com o valor contido no REG-DE (se 
REG-DE > REG-HL o Indicador CV é ligado). 

Restaura no REG-HL o endereço salvo na PILHA pela 

instrução da linha 1210. j c »■ ,» rv = 

Esta instrução não modifica os Indicadores de Estado CY ^e 
2, cora o que continua mantido o resultado da comparaçao 
efetuada na linha 13A0. 

A restauração tem que ser efetuada neste ponto porque 
pode haver Retorno na instrução seguinte e, neste caso, a 
PILHA DO SISTEMA deve estar posicionada no mesmo ponto no 
qual estava quando a rotina NUMX foi chamada. 

RETORNA da rotina NUMX caso o Indicador CY tenha^ sido 
ligado pela instrução 13AQ » o que indica Parametro 
Inválido'* (total já somado no REG-HL é maior da que 65525 

Desvia para a Instrução 1170 (A0A) para a obtenção 

processamento do próximo caráter contido no BUFFER. 


II - ROTINA PXLIN 
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11 — ROT X M ^ PXL T fxj 


11. t - OBJETIVO 

0 objetivo desta rotina é “Recuperar" a “Próxima Linha 1 * de ura 
"Programa BASIC"» a partir do seu “Endereço de Início"» 
comparando o "Numera" desta linha com um numero fornecido. 


U.e - CARACTERÍSTICAS 

Esta rotina utiliza os Indicadores de Estado CY e Z para 
comunicar á rotina "Chamadora" as condiçoes encontradas, 
0 endereço de início da “Linha Seguinte à Linha Recupe- 

rada" também é fornecida» para que a operação possa ser repe- 
tida, tornando possível recuperar todas as linhas do programa, 

0 endereço onde inicia o "Programa BASIC" (endereço de início 
da primeira linha) é guardado em um "Campo" de trabalho do 
Interpretador BASIC denominado TXTTAB (TEXT TABLE - AREA DE 
TEXTO ) t que fica em #F676/#F677 (dois BYTES), 

Quando desejamos a primeira linha do programa» devemos colocar 
em REG-DE o valor contido no campo TXTTAB (normalmente #0001 
veja exemplo a seguir). 

Deve ser fornecido um “Numero de Linha" à rotina PXLIN» e ao 
seu retorno os indicadores CY e Z serão posicionados para 
refletir a situação da "Linha Recuperada" em relação a este 
Número (Menor, Igual ou Maior), 


ARMAZENAMENTO DE UM PROGRAMA BASIC 

Vejamos como são armazenadas as linhas de um programa BASIC, 

Cada uma delas é precedida por dois BYTES que guardam o 
"Endereço de Inicio da Próxima Linha", mais dois BYTES que 
guardam o "Número da Linha" (em valor "Binária"), 

Cada uma delas é "Encerrada 11 por um BYTE que contém #00. 

A condição de "Fim de Programa" é indicada por uma linha cujos 
dois primeiros BYTES contém #0000 (se esta linha for a 
primeira indica que não há nenhum programa BASIC carregado)* 

0 "Conteúdo” (TEXTO) da linha é guardado de forma CODIFICADA» 
segundo critérios admí nistrados pelo BASIC, nao sendo 
diretamente legíveis sem um trabalho prévio de “Decodif icaçao" 
dos COMANDOS, FUNÇÕES e PAR3METR0S. 

Esta codificação visa reduzir o espaço de memória ocupado, 
além de facilitar os procedimentos de execução do programa 
(por exemplo, a instrução PRINT é representada por apenas ura 
BYTE que contém o "Código" correspondente "#91" - Estes códigos 
são conhecidos pelo nome de T0KENS), 


36 


II - ROTINA PXLÍN 


Por exemp lo, □ programa BAS I C : 


10 PRINT "BBB" 
ao BEEP 
30 END 


É armazenado da seguinte maneira (Digite^ este 
examine a memória com o comando .hB00O*8019 do 


programa 

BIT-BASIC) 


e 


Posição Inicial do "Programa BASIC^ 

ttBOOO #00 Primeira posição sempre contém #00 


Linha 

Número 10 

#8001 

#0C #80 

#8003 

#0A #00 

#B005 

#91 

#8006 

#22 

#8007 

#42 #42 #42 

#800A 

#22 

#800B 

#00 


Endereço início próxima linha (#800C) 
Número da linha (#O00A - 10) 

Código (T0KEN) da instrução PRINT 
Caráter "Aspas" ( " > 

BBB 

"Aspas" 

Fim da linha 10 


Linha 

Número 20 

#80QC 

#12 

#80 

#800E 

#14 

#00 

#8010 

#C0 


#8011 

#00 



Endereço início próxima linha (#8012) 
Número da linha (#0014 = 20) 

Código instrução BEEP 
Fim da li nha 20 


Linha 

Número 30 

#8012 

#18 

#80 

#8014 

#1E 

#00 

#8016 

#81 


#8017 

#00 



Endereço início próxima linha (#801B) 
Número da 1 inha ( #00 1E = 30 ) 

Código instrução END 
Fim da 1 inha 30 


Condição de "Fim de Programa" 

#8018 #00 #00 #0000 nos dois BYTES seguintes à ^última 

linha indicam "Fim do Programa BASIC" 


n.3 - CONDIÇÕES de entrada 

REG-DE - Endereço de início da "Linha a Ser Recuperada" 

T03 - Número de Linha a ser comparado 

11.4- CONDIÇÕES DE SAÍDA 

RE6-BC - Endereça de início da "Linha Recuperada" 

REG-HL - Número da Linha Recuperada 

REG-DE - Endereço de início da "Linha Seguinte à Linha 

Recuperada" 

C,Z - Fim de Programa atingido 

NC*Z - Número Linha Recuperada = Número Pesquisado 

NCjNZ - Número Linha Recuperada > Numero Pesquisado 

C,NZ - Número Linha Recuperada < Número Pesquisado 


II - ROTINA PXLIN 
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11.5 - ROTINA ASSEMBLER 


1400 

PXLIN: 

PUSH 

DE 

1410 


PDP 

BC 

1420 


LD 

( A05+1 ) , DE 

1430 

3> 

O 

Ül 

LD 

HL, (#0000) 

1440 


LD 

A,H 

1450 


□R 

L 

1460 


SCF 


1470 


RET 

Z 

1480 


INC 

DE 

1490 


INC 

DE 

1500 


LD 

( A06+2) , DE 

1510 

A0Ó: 

LD 

DE, (#0000) 

1520 


LD 

HL,íT03) 

1530 


RST 

#20 

1540 


EX 

DE, HL 

1550 


LD 

( A07+2) , BC 

1560 

A07 : 

LD 

DE, (#0000) 

1570 


RET 

2 

15B0 


CCF 


1590 


RET 



1400 Salva na PILHA DO SISTEMA o conteúdo de REG-DE «endereço 
de início Linha a ser Recuperada). 

1410 Coloca no REG-BC o último valor armazenado na PILHA DO 
SISTEMA. 

(As instruções 1400/1410 efetuam a transferencia do valor 
do REG-DE para o REG-BC, utilizando a PILHA como meio 
intermediário. ) 


***# As instruções 1420 e 1430 servem para colocar no REG-HL 
o "CONTEÚDO DOS BYTES APONTADOS PELO REG-DE". 

Isto é conseguido fazendo com que a Instrução 1420 
"MODIFIQUE 0 OPERANDO DE ENDEREÇO 1 ' da instrução 1430. 
Com esta técnica, o BIT-BASIC MODIFICA SEU PRÓPRIO CÚDI60 
ASSEMBLER para alcançar o objetiva desejado. 


1420 Carrega no endereço "A05+1" (#7134), que corresponde ao 
"Operando de Endereço" da Instrução da Linha 1430 (A05), 
o valor contido no REG-DE. 

1430 Carrega no REG-HL os dois BYTES apontados pelo operando 
de endereço desta instrução (obtido a partir do REG-DE 
pela Instrução anterior). 

No caso do exemplü do item 11.2, se REG-DE contiver #8001 
(Endereço da Linha Recuperada), a instrução da linha 1430 
ficará "LD HL , (#8001 ) " , com o que será carregado #B00C 
no REG-HL (conteúdo dos BYTES #0001 /#8002 > , que è o 
"Endereço de Inicio da Linha Seguinte á Linha 
Recuperada" . 


3S 
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1440 

1450 


do REG-H, na 


1460 

1470 


14B0 

1490 


1500 

1510 

1550 

1530 

1540 


1550 

1560 


1570 


15B0 

1590 


Carrega no PES-A o conteúdo do REG-H, 

Compara o conteúdo do REG-A com o conteúdo 
modalidade OR. 

£T indicador Z é ligado caso o BYTE resultante seja #00 e 
para que isto aconteça é necessário que ambos os 
registradores contenham #00- 

Este teste, portanto, visa ^verificar se REG-HL ^ contém 
#0000, o que indica a condição de "Fim de Programa . 

"Liga" a Indicador de Estado CY (SCF - SET CARRY FLAG 
Liga Indicador de Transporte). „ 

Caso o Indicador Z tenha sido ligado na instrução 1450, a 
condição de "Fim de Programa" terá sido alcançada <dois 
primeiros BYTES da “Linha Recuperada contém #0000). 

Neste casoj é efetuado □ RETORNO ao ponto de chamada a 
PXLIN, com as condições (C,Z) posicionadas. 

Adiciona uma unidade ao REG— DE. 

Adiciona uma unidade ao REG-DE. 

Neste ponto o REG-DE passa a apontar para o terceiro BYTE 
da "Linha Recuperada" to terceiro e quarto BYTES contem o 
"Número" desta linha). , . , 

Carrega REG-DE no endereço A06+2 , que è o Parâmetro de 
Endereço" da instrução seguinte (1510). 

Utilizando a mesma técnica descrita nas linhas _ 1420/1430, 
carrega no REG-DE o "Número da Linha Recuperada . 

Carrega no REG-HL o conteúdo do campo T03 do SIT-BAblC, 
onde está armazenado o "Número de Linha a Ser Comparado . 
Utiliza a rotina DC0MPR do BIOS para comparar REG-HL com 
REG-DE. 

Troca os conteúdos de REG-DE e REG-HL. 

Com isto, ^REG-HL passa a conter o 
Recuperada" . 

Repete a operação da linha 1450 
Repete a operação da linha 1430. 

Com isto, recolocamos no REG-DE o 'Endereço de Imcia da 
"Linha Recuperada", que poderá ser utilizado pela rotina 
chamadora para repetir toda a sequância de operações da 
rotina PXLIN, recuperando desta forma todas as linhas do 
programa, uma ap6s a outra, até se alcançar a condição 

desejada. , , . 

Caso a comparação efetuada na linha 1530 resulte como 
"Iguais" (Z), o que indica qual “Número da Linha 
Recuperada" é igual ao "Número Pesquisado , é efetuado o 
RETORNO sob a condição (NC,2). 

"Complementa" o valor de CY. „ 

RETORNA ao ponto de chamada de PXLIN sob as condiçoes 
(NZ.NC) ou t N2 , C ) , indicando que o “Número da Próxima 
Linha" é MAIOR ou MENOR do que o "Número Pesquisado' . 
0BSERVAÇÍ0 : As instruções das linhas 1540 a 1570 nao 
alteram o posicionamento das Indicadores CY e 2. 


"Número da Linha 
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IS — ROTINA LI3TPG 


1E.1 - OBJETIVO 

0 objetivo desta rotina é apresentar um programa BASIC na Tela 
do Monitor ou TV, a partir de uma linha determinada, até 
atingir a condição de "Tela Cheia" ou de “Fim do Programa", 
situação em que o processo é interrompido e o controle é 
devolvido ao Interpretador BASIC. 

£ão novas funções de grande utilidade disponibil izadas pelo 
aiT-BASIC, especialmente quando se trata de programa ^coi» 
grande número de linhas, pois a listagem è feita Sob 
Controle do Usuár Lo" . 


12.2 - SINTAXE E FUNÇÕES DOS COMANDOS. 

12.2.1 - LISTA PAGINA A PARTIR DE UMA LINHA DETERMINADA. 

Sintaxe : <<111 (HOTBIT ) ou //II 1 (EXPERT ) 

Função : Lista página a partir da linha de número 111 

Sintaxe : <1 (HOTBIT) ou /C (EXPERT) 

Funçlo : Lista página a partir do início do programa 

Sintaxe : << (HOTBIT) ou // (EXPERT) 

Função : Avança uma linha na página atual 

Exemplo: <<130 (HOTBIT) ou //130 (EXPERT) 

Lista ‘'Página" a partir da linha 130 


12. E. 2 - LISTA "PRÓXIMA PAGINA" 

Sintaxe : < (HOTBIT) ou / (EXPERT) 

Função : Lista "Página" a partir da iinha imediatamente 
seguinte à última linha apresentada na Tela anterior. 


1S.2.3 - FIXA "ÍNDICE DE PAGINA" 

Sintaxe : <<111, i (HOTBIT) ou //lll>i (EXPERT) 

111 = Número da linha 
i = índice ("O" a "?") 

Função : Relaciona a linha de número _ 111 ao índice l 

Exemplo : <<320,3 (HOTBIT) ou Z/320,3 (EXPERT) 

0 índice de número "3" passa a "Apontar para a linha 
de número 320 

OBS. : Para ser ut i 1 izado em associação com o comando 

"Lista Página a partir de índice", a seguir descrita. 

A diferença deste comando em relação ao do item 12.2.1 
á a presença do segundo parâmetro (índice) . 
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12.2.4 - LISTA D AGINA A PARTIR DP ÍNDICE 

Sintaxe : <i (HOTBIT) ou f i (E XPERT ) 
i = índice ("O" a "9") 

Função : Lista página a partir da linha cujo número está 
associado ao índice "i" 


Exemplo : <3 (HOTBIT) du /3 ( EXPERT ) 

Lista Página a partir da linha cujo número foi 
"Assoe i ado" ao índice "3" 

Equivale a <020 ou //320 para o caso mostrado no 
exemplo do item 12.2.3 

A diferença deste comando em relação ao da itea^ 
12.2.2» é a presença do índice após o "<“ ou V 


12.3 - CARACTERÍSTICAS 

Esta rotina é acionada quando a primeira posição da linha de 
comando para o BIT-0ASIC contém o caráter "< (#3C ~ HOTBIT) 
ou <#2F - EXPERT), 

Antes de iniciar a apresentação a Tela é totalmente "Apagada" 
sendo as linhas "escritas" de^cima para baixo. Isto permite 
uma maior velocidade em relação ao comando LIST^ do BASIC, en 
razão de não ser necessário "Deslocar para Cima" toda a Tela 
a cada vez que ela se encontra "Cheia" e nova linha deve ser 
inserida. 

Se a última linha do programa nao cabe na PAGINA (Tela 
Completa) atual, ela ê "Apagada" para nào aparecer incompleta. 
Portanto, todas as linhas listadas pelo BIT-BAS1C sempre 
aparecem "completas" na Tela. 

É possível também "Identificar Rotinas" do programa BASIC com 
números de "0" a "9" (índice), para posteriormente solicitar 
que este programa seja listado a partir destas rotinas. 

Estas "Novas Funções" acrescentadas ao BASIC sao 
extremamente úteis para se trabalhar com programas "Extensos", 
especialmente quando é necessário "Caminhar" neles. 

A rotina apresenta também outros "Pontos de Entrada" 
("Entry-Points") (LI5TPG1, LISTPG2, F1HLST ) que sao 
utilizados por outras rotinas do BIT-BSIC que também necessitam 
apresentar linhas na tela. 

A rotina LIST do Interpretador BASIC ique está colocada entre 
os endereços #522E e #5283 da RDM) nào foi utilizada pelo 
BIT-BASIC porque sua codificação e pontos de entrada nào 
atendem ás necessidades deste. 
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12.4 - ROTINA ASSEMBLER (LISTAPG). 

Este trecho da rotina LISTAPG determina ^gual a função a 
executar e efetua a preparação de sua execução. Executa também 
a função de de "Fixar forfice de Página 1 . 


CONDIÇBES DE ENTRADA 

REG-HL - Aponta para □ segundo caráter da linha de comando 
do BIT-BASIC. 

T03 - Coptém o Número da Última Linha da “Página Anterior . 

T01 - Contém o Número da Primeira linha da Página Anterior. 


CGNDIÇOES DE SAÍDA 

T01 - Número da Primeira Linha da página listada. 

T03 - Número da Última Linha da página listada. 


1620 LISTAPG: 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 BOI: 

1710 

1720 B0P: 

1730 

1740 

1750 

1760 

1770 

1760 

1790 

1800 

1810 B03: 

1020 

1830 B04 : 

1840 

1850 

1B60 

1870 

1880 

1890 B05: 

1900 

1910 B06: 

1920 

1930 B07: 

1940 


CALL 

RST 10 

JR 

Z,B07 

JR 

C.B05 

CP 

#xx 

JR 

NZ,B04 

CALL 

PARU 

JR 

C , B0 1 

JR 

NZ > B02 

LD 

DE,(T01 > 

INC 

DE 

LD 

ÍT03) i DE 

CALL 

RST 10 

CP 

#2C 

JR 

NZ,BQ7 

CALL 

RST 10 

JR 

NC»B07 

CALL 

ÍNDICE 

LD 

BC,(T031 

LD 

(B03+2) , HL 

LD 

(#0000) ,8C 

JP 

RET04 

CP 

#58 

JR 

NZ,B07 

LD 

DE, #0000 

LD 

ÍT03).DE 

JR 

B07 

DE^n 

J9 

CALL 

ÍNDICE 

LD 

ÍB06+I > ,HL 

LD 

HL, (#0000) 

LD 

(T03Í , HL 

LD 

A.ttOC 

RST 

#18 


<#3C H0TBIT 


#2F EXPERT) 
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1620 

1630 

1640 

1650 

1660 


Obtém próximo caráter da linha de comando. 

Caso encontre a condição de H Fim de Linha*' (Z) assume a 
função *’Lista Próxima Página" ía # linha de comando 
continha somente o caráter <" ou K /M. 

Isto será feito a partir da instrução 1930? de nome B07. 
Caso encontre um caráter numérico (Ç) imediatamente após 
o caráter *'<" ou " /"? assume a função de "Lista Página a 
Partir de índice"? que está implementada a partir da 
Instrução 1890 ÍB05) * 

Se as condições anteriores não se verificarem? testa se □ 
caráter obtido é #3C ("< M - HGTBIT) ou U3F íV" 

j é 

Se não é "<" ou "/" desvia para a Instrução 1B30 (B04). 


**** Caso os dois primeiros caracteres da Linha de Comando para 
o BIT-BASIC sejam "<<" (H0TBIT) ou “//" (EXPERT ) , assume a 
função "Lista Página a Partir de Uma Linha Determinada 
ou a função "Fixa índice de Página". 

1670 Efetua chamada á rotina FARM, cuja função é "Obter 
Parâmetro Numérico" (no REG-DE). 

1680 Desvia para a instrução 1700 íBOt) caso tenha sido obtido 
um parâmetro numérico inválidq. 

1690 Desvia para a instrução 17E0 (B02) caso tenha sido obtido 
um parâmetro numérico válido e diferente de zero. 

1700 Caso o parâmetro numérico seja zero ou inválida, coloca 
em REG-DE o número da "Primeira Linha da Página atual . 

( Assume função 11 Avança Uma Linha e Lista Página .) 

1710 Soma 1 em REG-DE, para que seja pesquisada a linha 
"Seguinte á Primeira Linha da Página Anterior". 

1720 Armazena o parâmetro numérico obtido a partir do comando 
BIT-BASIC . (ou o número de linha recuperado pelas 

instruções 1700/1710) no "Campo de Trabalho" T03, (dois 
BYTES em #7B16/#7B17) , onde é guardado o "Número da Linha 
Seguinte á Óltima Linha Apresentada na Tela"(o BIT-BASIC 
sempre lista uma nova página a partir do número contido 
neste campo) . 

1730 Obtém próximo caráter da linha de comando. 

D objetivo é verificar se existe mais um parâmetro a ser 
recuperado {indicado pela presença de uroa vírgula ( #cC ) 
após o primeiro parâmetro numérico). 

Em caso negativo, assume a função “Lista Página a Partir 
de Uma Linha Determinada" (<< ou //>.„ 

Em caso afirmativo, assume a função Fixa índice de 
Pág ina" (<<111, i ou // 1 1 l , l ) ■ ^ n 

1740 Compara caráter obtido com #2C <",">■ „ , om . 

1750 Se não é virgula, desvia para a instrução lVdO ihu/í. 

#*#* As linhas 1760 a 1020 implementam a > função "Fixa índice 
de Página" . 

1760 Dbtèm no REG-A o próximo caráter da linha de comando 
(índice, "0" a "9"). 
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1770 Se o caráter nlo é numérico, desvia para a instrução 1930 
ÍB07 = Lista Página a partir do primeiro parâmetro 

obtido). 

1780 Efetua chamada á rotina ÍNDICE, encarregada de ohter em 
REG-HL o endereço na tabela T02, onde deve ser guardado o 
parâmetro numérico anteriormente obtido, correspondente 
ao índice contido em REG-A. 

1790 Carrega no REG-BC o primeiro parâmetro numérico obtido, 
que havia sido salvo no campo T03. 

1800 Carrega o endereço contido no REG-HL (endereço 

pertencente â tabela T02), nos BYTES correspondentes ao 
operando de endereço da instrução seguinte (B03). 

1810 Carrega na tabela T02 (posição correspondente ao endereço 
de REG-HL), o valor do REG-BC (número de linha do 
primeiro parâmetro). 

1820 Encerra a funcao que "Fixa índice de Página", retornando 
ao BASIC via rotina RET04 (retorna "Normal" ao BASIC). 

'*#** As linhas 1830 a 1670 complementam a verificação da função 
solicitada, que pode ser ainda "<[" ou "<" (HÜTBIT) ou 
*/t" ou ( E XPERT) . 

1830 Compara caráter obtido com "#5B" (“C">. 

1040 Se não é desvia para a instrução 1930 (B07). 

Com isto será executada a função "Lista Página" a 
partir dos valores já existentes em TO l e Tò3, 

1850 Se caráter em REG-A é "C", carrega #0000 em REG-DE . 

1860 Carrega #0000 em T03 para que a Página seja listada a 
partir da primeira linha do programa. 

1070 Desvia para a instrução 1930 (B07). 

1880 BYTES livres, para facilitar adaptações no BIT-BAS1C. 

**** As linhas 1890 a 1920 fazem a preparação para a funcao 
que "Lista Página a Partir de índice", recuperando da 
tabela TOE o número da linha correspondente ao índice 
especificado. 

1890 Efetua chamada à rotina ÍNDICE, encarregada de obter em 
REG-HL o endereço na tabela T02 de ande deve ser 
recuperado o número de linha previamente armazenado, 
correspondente ao "índice" contido em REG-A^("0" a "9"). 

1900 Carrega no operando de endereço da instrução B06 (linha 
1910) o conteúdo de REG-HL, que contém o endereço desejado 
da tabela TOE. 

1910 Carrega em REG-HL os dois BYTES da tabela T02 que contém 
o número da linha desejada. h u 

Se o número fornecido como índice for "0 , REG-HL conterá 
a primeiro e segundo BYTES da tabela. Se o número for 
"1", conterá o terceiro e quarto BYTES, e assim por 
diante. 

1920 Carrega no campo T03 o valor do REG-HL (Número da Linha 
Correspondente ao índice) . 

Este número è "Salvo" para uso posterior. 
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**** As linhas 1930/1940 "Limpam a Tela" antes de iniciar a 
apresentação da linhas do prqgrama. 

1930 Carrega em REG-A o valor #0C- 

1940 Efetua chamada à rotina OUTDO í OUTPUT DO - EXECUTA SAÍDA) 
do BIOS) cuja função é "Enviar um Dado ao Último 
Dispositivo Referenciado'* (neste caso, a Tela). 

Alguns caracteres têm finalidades especiais quando 
tratados por esta rotina (veja APÊNDICE 06). 

Este é o caso do caráter #0C, cuja função á "Limpar a Tela 
e Voltar o Cursor para a Posição (1,1 ) 11 1 equivalente ao 
acionamento das teclas "C0NTR0L+L" . 

Em função deste procedimento, cada nova "Página" é 
apresentada pelo BIT-BA5IC sempre "de cima para baixo". 


12.3 - ROTINA A5SEMBLER ÍLISTPGU 

cstE? trecho da rotina LISTAPG percorre □ programa BA51L ate se 
posicionar na primeira linha a ser apresentada. 

CONDIÇÕES DE ENTRADA i 

T03 - Número da Linha a ser Procurada 

CONDIÇÕES DE SAÍDA : 

RÊG-DE - Endereço da Primeira Linha a Apresentar 


1960 LISTPG1: 
1970 B10: 

19S0 

1990 


LD DE,(tiF676) 
CALL PXLIN 
JR NCjLISTPGB 
JR NZ ) B1Ô 


1960 Carrega no REG-DE o conteúdo dos BYTES #Fó7ó/#F677 tLampo 
TXTTAB do BASIC = Endereço da primeira linha do 

programa ) * 

A primeira linha a ser apresentada é procurada sempre 
desde o inicio do programa BASIC, em razão de que a cada 
nova inclusão/exclusia/al teraçao o Interpretador BASIC 
realoca todas as linhas do programa, com modificação de 
seus endereços na memória. 

1970 Efetua chamada à rotina PXLIN, para obter a "Próxima 
Linha 11 do programa BASIC, 

Esta rotina compara o número da linha obtida com o 
conteúdo do campo T03, e posiciona os Indicadores LY e Z 
para indicar as cond i ções encontradas . 

***** Neste ponto o campo T03 pode conter os valores: 

1) "Zero", caso o comando atual seja " <<" ou V/" 
("Listar Página a Partir do Inicio do Programa BASIC"?, 

2) "111", caso o comando atual seja "<<111 11 ou "7/111" . 
("Lista Página a Partir da Linha 111.) 
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3) "Número da Linha Seguinte â Última Linha Já 
Apresentada na Tela"* caso o comando atual seja V" ou 
V M (este número terá sido salvo na passagem anterior 
pela rotina LI ST APS. 

("Lista Próxima Página".) 

4) "Número da Linha Correspondente ao índice i% caso o 
comanda atual seja "<i“ ou Vi". 

("Lista Página a Partir de índice".) 

1980 Caso o número da linha obtida seja maior ou igual a T03, 
desvia para a rotina LF5TP6B, que iniciará a apre sentação 
da Página na Tela. 

1990 Caso o fim do programa não tenha sido atingido, desvia 
para a instrução 1970 (810) para obter a próxima linha. 
Caso tenha sido alcançado □ fim do programa segue para a 
Instrução seguinte (Rotina FIMLST), 


15.6 - ROTINA ASSENBLER (FIHLST) 

Este trecho da rotina LISTAPG efetua os procedimentos para 
encerramento da listagem de uma Página na Tela. 


2010 FIMLST : 

X0R 

A 

2020 

LD 

(T07) ,fl 

2030 

LD 

HL, #0015 

2040 

JP 

RET02 


2010 Vera" o conteúdo de REG-A, 

2020 Nove zero ÍREG-A) para o campo T07» 

0 campo T07 ê utilizado para indicar que devem ser 
apresentadas apenas as linhas que contém uma constante 
determinada (veja comando ítem 19), e ê sempre 

"Desligado" ao fim de cada Página apresentada. 

2030 Carrega o valor #0015 no REG-HL, 

2040 Desvia para a rotina RETG2 que fará a passagem do 
cará ter #15 à rotina de tratamento de Tela. Assim será 
executada a função especial "Apaga Toda a Linha Onde 
Está o Cursor" (veja APÊNDICE 06). 

Procedendo desta forma, a última linha que seria 
apresentada na tela será sempre inteiramente "Apagada 11 , 
ficando o rou número "Guardado" no campo T03 para que ela 
seja apresentada na "Próxima Página”^ caso solicitado. 

Esta estratégia foi utilÍ 2 ada em razao de que as linhas 
de programa BASIC sao de tamanho variável, e serve para 
garantir que nunca uma linha será "Pare ialmente" mostrada 
na Tela, 
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12.7 - ROTINA ASSEMBLER (LISTPG2) 

Este trecho da rotina LISTAPG apresenta na Tela as linhas de 
uma Página, uma a uma, até alcançar a condição de ‘ T ela 
Completa" ou de "Fim de Programa". 


CONDIÇÕES DE ENTRADA i 

REG-HL - Número da Primeira linha 

REG-BC - Endereço de Início da Primeira linha 

REG-DE - Endereço de Início da Próxima Linha 


(P^ra o exemplo de programa mostrado no item II-11.2, no caso 
da primeira linha, o conteúdo do REG-HL seria #000A (10), o do 
REG-BC #B001, e o do REG-DE seria #8000. 


2070 LISTPGS: 
2080 BI 1 : 

2090 

2100 

2110 

2120 

2130 

2190 

2150 

2160 


LD <T01),HL 
CALL #00B7 
JR C, FIMLST 
PUSH DE 
CALL IMPLIN 
POP DE 

JR C.FIMLST 
CALL PXLIN 
JR NZ.BU 
JR FIMLST 


2070 

20B0 

2090 


2100 

2110 

2120 

2130 

2190 

2150 

2160 


"Salva" o "Número da Primeira Linha Apresentada na feia" 
no campo T01. 

Efetua chamada á rotina BREAKX (" INTERRUPÇÃO- X ) do BIOS, 
cuja função é "Verificar se Estio Pressionadas as Teclas 

CONTRQL+STOP" . , 

Caso as teclas estejam sendo acionadas (neste caso o 
Indicador CY é “Ligado" pela rotina BREAKX), o programa è 
desviado para a rotina FIMLST, já descrita no item 

anterior. , _ . . ^ 

Isto ê feito para possibilitar ao usuário a interrupção 
da listagem antes do seu final. 

"Salva" na PILHA DO SISTEMA o REG-DE, que contém o 
"Endereço de Início da Próxima Linha" (REG-DE será 

utilizado/modificado pela rotina IMPLIN). 

Efetua chamada à rotina IMPLIN, que faz a apresentação de 
uma linha na Tela. .... 

Recupera o ll Endereço de Início da Próxima Linha oa 
pilha , 

Caço tenha sido atingida a condição de "Fim de Tela" (o 
Indicador CY é "Ligado" por IMPLIN neste caso), desvia 
para a rotina FIMLST, já descrita no item anterior. 

Obtém ã "Próxima Linha" do programa BASIC. ^ 

Caso nao tenha sido alcançada a condição de qJ.^kiv 
P rograma' 1 (indicador 2 posicionado peia rotina rXLlN ), 
desvia para a instrução 20B0 (011) desta rot ma, para 

apresentação da nova linha na Tela. 

Caso tenha ocorrido o fim do programa antes de completada 
a Tela, desvia para a rotina FItILST. 
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13 — ROTINA IMPLIN 


13. 1 -OBJETIVO 

0 objetiva desta rotina á "Decodificar 11 a linha de programa 
BASIC» mostrar na Tela o "Numero da Linha" e acionar a rotina 
IMPL que apresenta os demais caracteres na Tela. 

13.2 - CONDI ÇBES DE ENTRADA 

REG-HL - Número da Linha 

REG-BC - Endereço de Início da Linha 


13.3 - CONDIÇÕES DE SAÍDA 
CY = C - Tela Completa 

CY = NC - Tela ainda não atingiu a última linha inferior 


13.4 - ROTINA ASSEMBLER 


2190 

IMPLIN: 

LD 

(T03) , HL 


2200 


LD 

HL, #0004 


2210 


ADD 

HL, BC 


2220 


LD 

BC, #5284 


2230 


CALL 

CALL 


2240 


LD 

A, (T07) 


2250 


CP 

#00 


2260 


JR 

2, B14 


2270 


CALL 

VERCHR 


E2B0 


CCF 



2290 


RET 

NC 


2300 

B14: 

LD 

HL , < T 03 1 


2310 


LD 

BC, *3412 


2320 


CALL 

CALL 


2330 


LD 

A, #20 


2340 


RST 

#18 


2350 


LD 

HL,#F55D 


2360 


CALL 

IMPL 


2370 


RET 



2190 

"5a Iva 11 

REG-HL 

(Número da Linha) no campo T03. 


2200 

Carrega 

#0004 em REG-HL. 


2210 

Soma ao 

REG-HL 

o REG-BC (Endereço de Início da 

Linha } . 


Com isto 

» REG-HL passa a apontar para a "Posição 

Inicial 


da Linha 

+4", 

que é onde se inicia de fato 

o seu 


conteúdo 

) já 

que os dois primeiros BYTES contém o 


"Endereço da Próxima Linha" e os dois BYTES seguintes 
contém o "Número da Linha" (veja exemplo do item 11-11. 2» 
no qual REG-HL estaria apontando para #8005 no caso da 
linha 10, ou #0016 no caso da linha 301. 
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*0 


££20 

£230 


de efetuar 
'Desfazendo" 


a 

a 


2240 


2250 

2260 

£270 


2280 


2290 


2300 

2310 

£320 


2330 

£340 

2350 

2360 

2370 


Carrega no REG— BC o valor H52B4* 

Aciona a rotina do BASIC encarregada 
a Decodif icaçao" de uma linha de programai 
codificação interna efetuada pelo BASIC. 

Esta rotina inicia na endereço *5284 da e por este 

motivo é necessário acessá-la por intermédio da rotina 

CALL . 

Esta rotina sempre coloca no 0UFFER a linha de programa 
RASir “Desmontada* 1 (a partir do endereço #F55fc), na mesma 
forma comque ela foi or iginalmente digitada Pêlo usuário 
(exceto o "Número da Linha 11 que nao é ai colocado). 

Carrega no REG-A o conteúdo do campo T07, que indica Se 
è para Verificar ou Não" a presença de uma constante 
determinada na linha de programa (este campo è Ligado 
pela rotina VERC7E - VERIFICA CONSTANTE) . 

Verifica se o campo T07 está “Desligado - ... 

Caso T07 esteja "Desligado * desvia para a instrução ddüO 
(B14), sem pesquisar a constante. 

Caso T07 esteja "Ligado", efetua chamada à rotina VERCHR 
(VERIFICA CARACTERES), cujo objetivo è checar se um 
determinado conjunto de caracteres, fornecidos por um 
comando *' = " está presente na Unha atualmente processada 
para decidir se ela deve ou não ser apresentada na Teia. 
r Inverte" o valor de CY. . , 

A rotina VERCHR "Liga" CY se a constante nao está 
presente, porém este Indicador é “Invertido por esta 
instrução, para não retornar da rotina IHPLIN com o 
Indicador CY "Ligado" neste caso, o que indicaria a 
condição de "Tela Completa", guando nao è esta a 

situação. 

RETORNA ao ponto de chamada da rotina InFLIN, 
listando a linha atual, caso a constante determinada 
esteja presente nesta linha. 

Recupera em REG - HL o "Número da Linha Atual , salvp 
campo T03 pela instrução 2190 no início desta rotina. 
Carrega no REG-BC o valor #3412* 

Aciona a rotina do BASIC encarregada de efetuar a 

apresentação de um "Número ASCII" na Tela, a partir do 
"Valor Binário" contido no REG-HL. 

Esta rotina inicia no endereço #3412 da R0H, porém 
utiliza instruções de endereços ocupados pelo BIT-BA5IC, 
senda necessário acessá - la par intermédio da rotina CALL* 
Como REG-HL contém o "Número da Linha", é este o número 
que será colocado na Tela* 

Carrega #20 no REG-A* 

Apresenta o caráter "Branco" í"#20") na Tela, em seguida 
aa "Número da Linha", utilizando a rotina GUTDO do BASIC * 
Carrega no REG-HL o valor #F55D, que é o "Endereço do 
BLIFFER da Linha Decodificada, menos 1". 

Efetua chamada à rotina 1MPL, a seguir descrita, que 
colocará o TEXTO DA LINHA na Tela. 

RETORNA ao ponto de chamada á rotina IMPLIN, para 
obtenção da "Próxima Linha" a ser apresentada. 


nao 

não 


no 
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1 -*+ — ROTINA I MPL 

14.1 - OBJETIVO 

0 objetivo desta rotina é controlar a colocação de cada 
caráter da linha atuai na Tela* a partir do BUFFER da BASIC 
que inicia em #F55E» até que toda a linha^ tenha sido 

apresentada ou até que tenha sido alcançada a “Última Linha 
Inferior da Tela". 

14.2- CONDIÇÕES DE ENTRADA : 

REG-HL - Endereço de Início do BUFFER» menos 1 


14.3- ROTINA ASSEMBLER 


2400 

IMPL: 

CALL 

RST10 

2410 


JR 

Z.816 

2420 


CALL 

IMPTELA 

2430 


RET 

C 

2440 


JR 

IMPL 

2450 

B16: 

LD 

A, #06 

2460 


CALL 

IMPTELA 

2470 


RET 

C 

2480 


LD 

A, #01 

2490 


LD 

(#F3DD) , A 

2500 


RET 



2400 Obtém próximo caráter da linha a ser listada. 

E410 Caso tenha sido atingida a condição de M F1» de Linha" 
(indicada por #00 >, desvia para a instrução 2450 (Bló). 

2420 Efetua chamada á rotina IMPTELA» a seguir descrita» que 
apresenta o caráter na Tela e verifica se a última linha 
foi alcançada (Liga Indicador CY). 

2430 RETORNA ao ponto de chamada de IMPL caso a última linha 
tenha sido atingida. 

2440 Desvia para a instrução 2400 (IMPL) para obter e 
apresentar 0 próximo caráter. 

***# As instrugões das linhas 2450 a 2500 são executadas quando 
da condição de "Fim de Linha" e efetuam a movimentação do 
CURSOR para o início da próxima linha da Tela. 

2450 Carrega no REG-A o valor #0A. 

24ó0 Envia para a tela o Cãràter #0A, utilizando para isto a 
rotina IMPTELA. 

Esta ação resulta na execução de utn "Procedimento 
Especial" pela retina de Administração da Tela (veja 
APÊNDICE 06)* que neste caso é a função de "Mudança de 
Linha - Line Feed", acionada por aquele caráter. 

0 cursor estará posicionada na linha seguinte à última 
linha 1 istada . 
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2470 Caso a última linha inferior da Tela tenha sido 

alcançada, RETORNA ao ponto de chamada a II1PL. 

2480 Carrega #01 em REG-A. 

2490 Armazena o valor #01 no campo de nome CSRX do BASIC 

(CURSOR POSITIÜN X), localizado^ no BYTE #F3DD, onde é 

armazenado o valor da posição " X" atual do CURSOR 

(posição "dentro 11 de uma determinada linha, ou "número da 
coluna " ) , 

0 efeito deste procedimento é fazer com que o CURSOR 
passe a estar na primeira posição (Colunai da linha 
posicionada pela instrução de 2460* 

DBS*: A posição de memória de endereço #F3DC guarda o 
campo C5RY (CURSOR P05ITI0N Y) onde o BASIC armazena o 
valor da posição “Y 41 do cursor (Linha da Telal. 

Podemos utilizar as variáveis CSRX e CSRY para movimentar 
o CURSOR pelas posiçoes que desejarmos na Tela. 

2500 RETORNA ao ponto de chamada da rotina ItIPL. 
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15 — ROTINA IMPTELA 

15.1- OBJETIVO 

* 

0 objetivo desta rotina ê apresentar na TELA do Monitor ou TV 
conectada ao seu MSX o caráter contido no REG-A, utilizando 
isto a rotina do BIOS de Administração de Tela OLITDO 

(EXECUTA SAÍDA - RST #18 í . 

15. e - CONDIÇDES de ENTRADA 
REG-A - Caráter a ser apresentado 

15.3 - CONDIÇÕES DE SAÍDA 

CY * C - Última linha da Tela alcançada 

CY = NC - última linha da Tela não alcançada 


15. A - ROTINA AS5EMBLER 


2530 

IMPTELA: 

LD 

C , A 

25A0 


LD 

A, (T18 ) 

2550 


CP 

#00 

2560 


JR 

NZ.B17 

2570 


LD 

A* (#F3DC > 

2580 


CP 

#17 

2590 


CCF 


2600 


RET 

C 

2610 

B17: 

LD 

A,C 

2620 


RST 

#18 

2630 


RET 



2530 "Salva" o caráter de REG-A no REG-C. 

25A0 Carrega no REG-A o campo T18, que indica se está sendo 
executado o comando " .c" ou ".m" do BIT-BASIC (Copia ou 
Move linhas - Veja rotina COPMÜV). 

2550 Compara REG-A com #00. 

2560 Se o campo T18 está "Ligado" (REG-A diferente de #00), d 
que indica que está senda processado um comando de COPIA 
ou MOVIMENTO de linhas, desvia para a Instrução 2610 
(B17), com o que o caráter é enviado para a tela sem 
verificar se a última linha inferior da Tela foi atingida 
(tais funções não podem ser interrompidas por esta 
condição) . 

Caso o comando atual não seja ”.c"^ou ".m", verifica se o 
caráter a ser apresentado vai ou não para a ultima linha 
da Tela, o que é feito pelas Instruções 2570 a 2600. 
Estas Instruções utilizam para esta verificação o própria 
controle do BIOS sobre o posicionamento do CURSOR. 

£570 Carrega no REG-A o conteúdo do campo CSRY (#F3DC - número 
da linha da Tela onde o CURSOR está localizado). 

25B0 Compara a "Posição Vertical" atual do CURSOR com £3 
= #17 (o indicador CY é "Ligado" caso o cursor esteja em 
uma linha "Menor" do que £3). 
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2590 "Inverte" o valor do indicador CY . 

Apóo esta instrução o indicador CY estará Ligado casa o 
CURSOR esteja localizado na linha 23 (#17) ou em^ linha 

anterior a esta (a linha 23 é utilizada como "Última 
Linha Inferior" da Tela). , 

2600 RETORNA ao ponto de chamada de IMPTELA caso a^ ultima 
linha tenha sido alcançada, com o Indicador CY "Ligado 
(C =Fim de Tela alcançado), para que sejam tomadas as 
providências devidas pela rotina chamadora. 

*#*# As linhas 2610 a 2630, finalmente, colocam na TELA o 
caráter desejado. 

2610 "Retorna" ao REG-A o valor salvo em REG-C pela Instrução 
2530 (caráter a ser apresentado na Tela). 

2620 Efetua chamada à rotina 0UTD0 (EXECUTA SAÍDA) do BIOS, 
que coloca o caráter desejado na Tela, ou executa a 
^Função Especial" por ele determinada (veja APÊNDICE 06). 

2630 RETORNA ao ponto de chamada de IMPTELA, com ^o caráter 
desejado já apresentado e com o indicador CY "Desligado 
(NC - Fim de Tela não alcançada). 
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53 


ü — ROTINA ÍNDICE 
ló.l- OBJETIVO 

0 objetivo desta rotina é calcular o endereço de tabela T02 
onde deve ser colocado, ou de onde deve ser _ retirada, um 
"Número de Linha" correspondente a um "índice" fornecido em 
»■ ornando do tipo "íOIlíi" ou do tipo 7i (EXPERT //lll,i ou 
'7i">. 

16. 2 - CARACTERÍSTICAS 

Como o índice ê comportado por um^ único dígito nao é 
utilizada a rotina PARU para sua obtenção. 

16.3 - CONDI ÇfiES DE ENTRADA 

REG-A - índice (Número de "0" a "9" - Formato ASCII #30 a 

#39). 

16.4- CQNDIÇBES DE SAÍDA „ , 

REG-HL - Endereço da tabela T02, correspondente ao Numero de 
Linha" relacionado ao índice. 


16.5- ROTINA ASSEMBLER 


2660 

ÍNDICE: 

SUB 

#30 

2670 


ADD 

A, A 

2680 


LD 

D, #00 

2690 


LD 

E.A 

2700 


LD 

HL,T02 

2710 


ADD 

HL, DE 

2720 


RET 


2660 

Subtrai 

#30 de 

REG-A . 


Com isto seu conteúdo "0 a 9" (ACII = #30 A #39) continua 
a ser "0 a 9", porém em "Valor Binário", ou seja, 
"00000000 = #00" a "00001001 = #09". 

2670 "Duplica" o valor de REG-A, adicionando o seu valor a ele 
próprio (cada Número de Linha ocupa dois BYTES). 

2680 "Zera" o conteúdo de REG-D. 

2690 Carrega REG-A em RE6-E. 

Com isto o REG-DE passa a conter ^o valor do 

"Deslocamento" do número de linha em relação ao "Início 
da Tabela". 

- Se índice = "0", Deslocamento = 0 (#0000). 

- Se índice - "1", Deslocamento = 2 (#0002). 

- E assim por diante. 

2700 Carrega em REG-HL o endereço de "Início da Tabela T02" 
(#7B02) . 

2710 Soma o "Endereço de Início da Tabela T02" com o 
"Deslocamento na Tabela" (REG-DE). 

Assim teremos em REG-HL o "Endereço na Tabela T02" 
onde está o "Número de Linha" correspondente ao índice 
fornec ido. 

2720 RETORNA ao ponto de chamada de ÍNDICE. 
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IV — ROT IMA VOLTLIN 


17-1 - OBJETIVO 

0 objetivo desta rotina é ‘'Retroceder " um certo ntimero de 
linhas em um Programa BASIC a partir da "Primeira Linha 
Apresentada na Tela" e, em seguida* desviar para a rotina 
èncarregada de "Listar Página" íLISTPGl /LI5TP62) . 


17.2 - CARACTERÍSTICAS. 

Esta rotina é acionada quando a primeira posição da linha de 
comando para o BIT-BA5IC contém o caráter "C" <#5B). 

Se nos procedimentos de retorno o inicia do programa for 
alcançado? será mostrada uma Página a partir da primeira linha 
do programa . 


17.3 * SINTAXE E FUNÇÕES DOS COMANDOS - 

17.3.1 - RETROCEDE TRÊS LINHAS E LISTA PAGINA . 

Sintaxe : í 

Função : Retrocede três linhas e lista página 

A escolha de "Três" linhas foi feita f neste casp, em razão 
de que este ê o maior numero de linhas que podemos 
retroceder com garantia de que nenhuma delas será "Pulada"? 
já que mais de três linhas de 256 caracteres ultrapassam os 
limites da tela (com largura normal? WÍDTH = 38). 


17.3.2 - RETROCEDE UMA LINHA E LISTA PAGINA. 
Sintaxe : lí 

Função : Retrocede uma linha e lista página 


17-3.3 - RETROCEDE "N" LINHAS E LISTA PAGINA, 
Sintaxe s Itnnn 

Função : Retrocede nnn linhas e lista página 
Exemplo : [130 

Retrocede 30 linhas e lista página 


17.4 - CÜNDIÇDES DE ENTRADA 

Comando 11 1 " f conforme sintaxe já descrita 


17.5 - CONDIÇBES DE SAÍDA 

Condi çoes requeridas pelas rotinas LISTPG1 ou LISTPG2 
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17.6 - ROTINA AS5EMBLER 

##*■» As instruções das linhas 2750 a 2840 colocam no campo TO 1 » 
a, "Quantidade de Linhas a Retroceder". 


2750 VOLTLIN: 
2760 
2770 
2780 
2790 
3800 
2810 
2820 
2830 

2840 C01: 


LD DE, #0003 
LD (T04),DE 
CALL PARU 
JR C.C02 
JR NZ,C01 
CALL R5T10 
CP #5B 
JR NZ,C02 
LD DE, #0001 
LD ( T04) , DE 


2750 Carrega #0003 em REB-DE. 

2760 Carrega #0003 em T04 (quantidade linhas a retroceder!. ^ 

2770 Efetua chamada à rotina PARU ( "Dbtém_Par3metro Numérico ). 

27B0 Caso tenha ocorrido erro na obtenção do parâmetro (CY 
Ligado), desvia para a instrução C02 assumindo 03 para a 
quantidade tíe linhas a retroceder ( T04 > . 

2790 Caso o número obtido seja diferente de Zero, desvia para 
a instrução 2840 ÍC01). 

2800 Caso o número obtido seja Zero (nao foi fornecido 
parâmetro numérico), obtém "Próximo Caráter , 

2010 Compara próximo caráter com "t" (#5B). 

2820 Se o próximo caráter nlo é “t" desvia para a instrução 
2850 (C02). Neste caso TOA contém 03. 

2830 Carrega em REG-DE o valor “i" (#0001), caso o próximo 
caráter seja "t" (trata-se de um comando "Ct“ - Retrocede 
uma linha). 

2840 Carrega em TOA o valor contido em REG-DE (que pode ser 
#0001 ou o valor do parâmetro numérico obtido). 


+#*# As linhas 2850 a 2950 posicionam o BIT-BASIC na “Primeira 
Linha" da "Página Anterior" apresentada na Tela. 

Se ela não está mais presente no programa (pode já ter 
sido eliminada) a linha seguinte ê posicionada. 

É a partir desta linha que o retrocesso é efetuado. 


2850 C02: 

LD 

DE, (#F676) 

2860 

LD 

HL, (T01 ) 

2870 

LD 

(T03) , HL 

2880 

LD 

A,#0C 

2890 

RST 

#18 

2900 C03: 

CALL 

PXLIN 

2910 

JR 

NC,C04 

2920 

JR 

N2,C03 

2930 

JP 

RET04 

2940 C04: 

PUSH 

BC 

2950 

POP 

DE 
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2050 Carrega no REG-DÊ os BYTES #F676/#Fó?7 que contém 
o"Endereço de Início da Primeira Linha de Programa BASIC" 
(campo TXTTAB do Interpretador BASIC)* 

2060 Carrega no REG-HL o "Numero da Primeira Linha da Página 
Anterior U i colocada no campo T01 pela rotina LISIPG2, 
Instrução 2070. 

2870 Coloca o conteúdo de T01 em TQ3 (via RE6-HL ) para 
“Procurar 41 esta linha no programa BASIC (Rotina 
2980 Carrega #0C no REG-A. 

2S90 “Apaga 1 ' a Tela (veja item 11-12. g? Instrução 1 9 hO > . 
2900 Efetua chamada á rotina PXLIN, para obter o Endereço e o 
Numero da 'Próxima Linha' 1 do programa BASIC. 

A pesquisa comeca a partir da pc-imeira linha do programa 
em função do valor colocado no REG-DE pela instrução da 
1 i nha 2850 * 

Será obtida uma linha de número "Igual ou Maior 14 que VG3. 
2910 Caso a rotina PXLIN “Devolva" a condicão *NC", o que 
significa que o “Número da Linha Obtida" é “Igual ou 
Maior" ao "Numero da Primeira Linha Teia Anterior" (Lampo 
T03), desvia para a Instrução 29A0 (COA) que dará 
continuidade ao comando de "Retrocesso 11 , 

2920 Caso a rotina PXLIN "Devolva" as condíçóes íCiNZ), o que 
significa gue o "Número da Linha Obtida" é "Menor" do que 
o número procurado (T03Í? desvia para a Instrução £900 
(C03) para obter e comparar a "Próxima Linha"* 

2930 Caso a condicão retornada por PXLIN seja (CiZ)* indicando 
“Fim do Programa"? efetua retorno ao BASlL em 

"Condição Normal", sem mostrar qualquer linha na Tela* 

£9A0 Coloca REG-8C na PILHA (endereço de início da linha 
Recuperada) , 

£950 Copia REG-BC para REG-DE (via PILHA). 

+#** As instruções das linhas 2960 a 3010 verificam se foi 
alcançado o "Inicio do Programa durante as 
P r oced i mentos de retorno? prov idenc i ando a sua listaqem 
desde este ponto em caso afirmativo. 


2960 CQ5 : 

LD 

HL, (#Fé>76) 

2970 

RST 

#20 

2930 

JR 

N2.C06 

2990 

LD 

DE, #0000 

3000 

LD 

<T03) ,DE 

3010 

JP 

LISTPG1 


£960 Carrega em RE6-HL o conteúdo dos BYTES ftF676'#F677 
(TXTTAB - "Endereço de Inicio de Primeira Linha do 
Programa " ) . 

£970 Compara REG-HL í Início Primeira Linha BASIC) com REG-DE 
(Início Linha Atual)? via rotina DCÜflPR do BIOS. 

£980 Se RE6-HL "Diferente?" de REG-DE, ío que significa que a 
Linha Atual não é a Primeira)? desvia para a instrução 
3030 (C06Í para "Retroceder Mais Uma Linha". 

Se início do programa alcançado, senue com a instrução 
2990. 

2990 Carrega ttOOOG no REG-DE 
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3000 

3010 


*#** 


3030 

3040 

3050 

3060 

3070 

3090 

3030 

3040 


3050 

3060 

3070 

3080 




Carrega #0000 em T03 (primeira linha a ser listada). 
Desvia para a rotina LI5TPG1, que fará a apresentaçao do 
Programa BASIC a partir da primeira linha (T03 = #0000). 

As instruções das linhas 3030 a 3080 retrocedem, BYTE 
a BYTE, a partir do endereço posicionado pelos 
procedimentos já descritos, até encontrar a posição de 
"Início da Linha Anterior Menos 1", que é o ultimo 
Caráter" da linha anterior a esta (sempre contém #00). 
Faremos sempre referência ao exemplo do item I 1-11.2 que 
descreve o armazenamento de programas BASIC. 

Se estivéssemos posicionados no "Início da Linha u0 
(Endereço #80121 ao final destas instruções, estaríamos 
P05ic ionados no "Início da linha 20 menos^l (#8000), que 
corresponde também ao "Final da Linha 10 (contêm #00). 
No caso de atingirmos o início do programa, estaríamos 
posicionados no endereço #8000, que sempre contém #00. 

C06: PUSH DE 

C07 : DEC DE 

C0B: DEC DE 

LD A, (DE) 

CP #00 
JR NZ , C0B 

"Salva" REG-DE na PILHA (endereço primeira posição da 
linha atual) (#8012). 

Subtrai 1 do REG-DE, que passa a apontar para a "Última 
Posição" da linha anterior (#8011) (esta posição contém 
#00 e deve ser "Pulada", o que é feito pela instrução 
seguinte que reduz REG— DE de mais uma unidade) ■ 

Subtrai 1 de REG-DE (#8010) . 

Carrega no REG-A o caráter apontado por REG-DE. 

Compara REG-A com #00. 

Se REG-A não contém #00, desvia para a Instrução 3050 
(C08Í para obter e comparar o caráter anterior a este. 

As instruções das linhas 3090 a 3160 verificam ^se a 
posição que contém #00 realmente corresponde a um "Final 
de Linha", pois é possível que no meio de uma linha 
também tenha sido armazenado um caráter #00 pelo BASIC 
(por exemplo, no endereço #8015). 

Isto é efetuado verificando-se se as duas posições 
seguintes ao #00 contém o "Endereço de Início da Linha 
Seguinte" (os dois primeiros BYTES de qualquer linha 
sempre contém esta informação). 

Para verificar se o #00 contido no endereço #80QB do 
exemplo corresponde a um final da linha, o BIT-BA5IC 
verifica se o conteúdo dos BYTES #800C/#800D é #8012, que 
corresponde ao endereço inicial da linha 30. 

Como esta condição é verdadeira, conclui-se que o caráter 
#00 pesquisado está no final da linha anterior à linha 
BASIC de número 20 que, por sua vez, é a linha anterior á 
linha 30. 

Com isto "Retrocedemos" uma linha no programa BASIC. 
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3090 
3100 
3110 
31 20 
3130 
31 40 
3150 
3160 

3090 

3100 

3110 


3120 


3130 


3140 


3150 


3160 


*#** 


3170 

3180 

3190 

3200 

3210 

3220 

3230 

3240 
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INC DE 

LD (C09+1),DE 
C09r LD HL, ( #0000 > 

POP BC 
AND A 
SBC HL, BC 
PUSH BC 
JR N2 , C07 

Adiciona 1 ao REG-DE, que passa a apontar para o caráter 
seguinte ao que contém #00 <#8000. 

Carrega REG-DE no "Campo de Endereço" da Instrução 31 10 
que, para o caso do exemplo, passa a ser "LD HL,(#800C)". 
Carrega no REG-HL o conteúdo do endereço definido pela 
instrução anterior. 

Após a sua execução, REG-HL conterá #8012, que é o valor 
armazenado nos BYTES #800C/#800D. 

Carrega o último valor da PILHA no REG-BC» que é o 
'Endereço de Início da Linha Anterior", aí colocado pela 
instrução 3030 (C06>. 

"Zera" o Indicador de Estado CY . 

Isto ê feito para que □ resultado da instrução seguinte 
não seja comprometido se CY estiver "Ligado". 

Subtrai de REG-HL o valor de REG-BC . 

Esta instrução subtrai ainda o valor de ^ CY deste 
resultado (nada será subtraído pois CY já foi "Zerado" na 
instrução anterior). n 

Esta instrução é utilizada para "Compararmos os valores 
contidos em REG-HL e REG-BC. 

“Salva" novamente na PILHA o conteúdo de REG-BC, dali 
retirado pela instrução da linha 3120 (não altera o 
posicionamento dos Indicadores de Estado CY e Z). 

Se a subtração da linha 3140 resulta "NZ’ , o que indica 
que o conteúdo de REG-HL não era igual ao conteúdo de 
REG-BC (os dois BYTES após #00 não contém o endereça de 
início da próxima linha), desvia para a i nstruçao 3040 
(C07) para a continuação dos procedimentos de retrocesso 

até o próximo #00. . . ... . 

Se REG-HL igual a REG-BC (uma linha foi retrocedida), 
segue para o trecho a seguir descrito. 

As instruções das linhas 3170 a 3240 verificam se já foi 
retrocedida a quantidade desejada de_ . linhas 
(armazenada no campo T04 pelas i nstruçoes iniciais da 
rotina VOLTLIN) . 


POP 

BC 

LD 

BC, ( T04 ) 

DEC 

8C 

LD 

A,C 

DR 

B 

JR 

Z,C10 

LD 

< T04 ) , BC 

JR 

C05 
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3170 Retira da PILHA o valor ai colocado pela Instrução 3150, 
com o objetivo de não deixar este valor Pendente na 
PILHA (ela deve sempre retornar A sua posição inicial). 

3180 Carrega no REG-BC a quantidade de linhas que falta ainda 
retroceder (Campo T04). 

3190 Subtrai 1 de REG-BC. 

3200 Carrega REG-C em REG-A. 

3S10 Compara REG-B com REG-A na modalidade 0R . 

0 objetivo é verificar se REG-BC contém #00 ( (somente 
neste caso o Indicador 2 estará Desligado após a 
execução desta instrução) . , 

3220 Caso REG-BC contenha #00, é porque já retrocedemos à 
quantidade de linhas desejada e, então, é efetuado desvio 
para a instrução 3270 (CIO), que encaminhará o programa 
para listar Página a partir da linha atual. 

3230 Caso ainda não tenhamos retrocedido a quantidade de 

desejada, armazena no campo T04 o conteúdo do REG-BC 
(quantidade de linhas a retroceder, menos 1). 

3240 Desvia para a instrução 2960 (C05) para verificar se o 
início do programa BASIC foi atingido, continuando os 
procedimentos de retrocesso de linhas. 

**** As linhas 3270 a 3350 efetuam a preparação para listar uma 
"Página" do programa BASIC, de acordo com os parâmetros 
exigidos pela rotina LISTPG2, a partir da linha obtida. 


3270 

CIO: 

PUSH 

DE 

3280 


INC 

DE 

3290 


INC 

DE 

3300 


LD 

(Cl 1 + 1 ) ,DE 

3310 

CU: 

LD 

HL, (#0000) 

3320 


POP 

BC 

3330 


LD 

(C12+2) ,8C 

3340 

C12: 

LD 

DE, (#0000) 

3350 


JP 

L ISTPG2 


3270 

3200 

3290 


3300 

3310 

3320 

3330 

3340 

3350 


Salva REG-DE na PILHA (endereço de início linha desejada). 
Adiciona 1 ao REG-DE. 

Adiciona 1 ao REG-DE. (passa a apontar para □ 
Terceiro/Quartb BYTES da primeira linha a _ listar, 
*BO0E/#800F no casa do exemplo, que contém o Numero da 
Linha" = #001# =20). „ „ 

Carrega REG-DE no campo de endereço da instrução CU* que 
passa a ser "LD HL,(#800E)" p ara o caso do exemplo. 
Carrega no REG-HL o "Número da Linha" desejada (#0014 = 

20 no caso do exemplo). 

Carrega PILHA no REG-BC (endereço da linha desejada). 
Carrega REG-BC no campo de endereço da instrução C12, que 
fica "LD DE, (#8000" para o caso do exemplo. „ 

Carrega no REG-DE o "Endereço de Início da Próxima Linha 
(#6012 para o caso do exemplo). _ 

Desvia para a rotina LISTPGS que fará a apresentapao de 
uma ‘‘Página" na Tela a partir da linha atual (linha 50, 
no caso do exemplo). 
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13 — ROT I IMA NDVOBAS 

IB.l - OBJETIVO 

0 objetivo desta rotina é repasicionar os parâmetros internos 
do BIÜ5/BASIC de maneira a possibilitar o carregamento de um 
novo programa BASIC, após o programa atual, sem destruir o seu 

conteúdo. _» „ 

Efetua ainda o "Retorno" ao primeiro programa, ou a Um ao dos 
dois programas presentes na memória. 

Estas novas funções disponíveis são muito úteis, par exemplo, 
quando queremos "inserir 11 no programa atual rotinas previamente 
preparadas e salvas. 

0 comando "Merge* do Interpretador BASIC apresenta, neste caso, 
as desvantagens de "'Misturar 1 as linhas e de ^exigir o 
salvamento prévio das rotinas no formata ASCII (Save , A) . 

Outra utilidade das novas funções é "Olharmos" um programa 
armazenado em fita ou disco sem destruirmos o programa atual e, 
opcionalmente , a ele "Retornarmos" sem necessidade de NOVA 
operação de "Carregamento". 

18. S - SINTAXE E EUNÇOES DOS COMANDOS 

38.2.1 - REPÔS ICIÜNA VARIÁVEIS 

Sintaxe : .z * _ ^ 

Função : Variáveis BASIC passam ã apontar para nova Posição 
Inicial" de carga de programas fapós o final do 
Programa Atuai - Programa Pimário). 

A carga do Programa Secundário poderá ser feita com as 
funções normais de “LOAD" do BASIC. 

18.2.2 - RETORNA AO PROGRAMA PRIMÁRIO 

Sintaxe : .zr _ _ 

Função : Retorna ao programa BASIC "Primário'. 

(0 programa "Secundário" é perdido.) 

18.2.3 * UNiaO DOS PROGRAMAS 
Sintaxe : .zu 

Função s Os programas Primário e Secundário se fundem num so. 


18.3 - CARACTERÍSTICAS 

Esta rotina é acionada quando as primeiras posições do comando 
BIT-BASIC contém os caracteres ".z". 

0 caráter seguinte define a opção desejada (Posicionamento, 
Retorno ou União). u j( 

Na função de "Preparação para Carga" ê reservada área Após 
programa corrente, que permanece na memória, porém "Invisível^. 
Se não há nenhum programa carregado não é aceita a "Preparação 
para Carga 11 de programa adicional, apresentando a mensagem de 
"ERRO DE SINTAXE" * 
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É possível carregar apenas um programa "Adicional’*, 
se a solicitação de carregamento for repetida por 
consecutivas» será apresentada a mensagem ERRO DE 
A operação de "União nao "Mistura as linhas dos 
0 novo programa permanece "Após o Primeiro” com a 
original» mesmo que a numeração das linhas seja infer 
primeiro programa (as linhas podem ser r 
posteriormente á operação de União í. ^ „ „ 

Com a utilização das novas funções de "Cópia' e Movi 
9IT-8ASIC poderemos» então, colocar a nova rotina na 
pragrafflâ em que desejarmos. 


Portanto» 
duas vezes 
SINTAXE” , 
programas . 

numeracao 
ior á do 
enumeradas 

mento* do 
ponto do 


10. 4 - ROTINA A5SEHBLER (NOVOBAS > ■ 

Esta rotina determina a função a ser executada e efetua o 
'Reposicionamento das Variáveis". 

**** As instruções das linhas 3380 a 3420 determinam a função a 
ser executada. 


3380 

3390 

3400 

3410 

3420 

3380 

3390 

3400 

3410 

3420 


*#** 


3430 

3440 

3450 

3460 

3430 


3440 

3450 

3460 


NOVOBAS: CALL RST10 

CP #72 
JP Z.RETBAS 
CP #75 
JP Z ,UNIBAS 

Obtém, em REG-A» o caráter seguinte ao caráter "z". 
Compara REG-A com #72 (Caráter "r"). 

Se REG-A - "r", desvia para a rotina RETBAS (Retorno ao 
programa Primário). 

Compara REG-A com #75 (Caráter "u"). 

Se REG-A = "u", desvia para a rotina UN1BAS (União dos 
programas Primário e Secundário). 

As instruções das linhas 3430 a 3460 não permitem que mais 
de um programa adicional seja carregado. 

D05: LD BC,(T06) 

LD A,B 
0R C 

JP NZ.RET03 
Carrega T06 em REG-8C. 

Este campo contém #0000 quando não há programa adicional 
carregado, e um valor diferente deste após a carga de um 
programa secundário. . „ „ 

(Retorna a #0000 após operação de "Retorno" ou União .) 
Carrega REG-B em REG-A. 

Compara REG-A com REG-C na modalidade "0R" . 

Se REG-BC (T06) não contém #0000, desvia para RET03 . 
Como o comando original (. 2 ) ainda está no BUFFER 
(#F55 E)t e como a rotina RET03 desvia para o endereço 
#4173 no qual o BASIC processa normalmente o conteúdo 
deste BUFFER» o resultado será a apresentação da mensagem 
'ERRO DE SINTAXE", já que " .z" é inválido para o BASIC. 
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**** As linhas 3470 a 3550 verificam se já há um programa BASIC 
carregado. 


3470 

LD 

BC, <#F676> 

3480 

LD 

(D06+2) ,BC 

3490 D06: 

LD 

BC, (#0000) 

3500 

LD 

A,B 

3510 

DR 

C 

3550 

JP 

Z ,RET03 


3A70 Carrega no REG-BC o endereço de "Início da Primeira Linha 
do Programa" (campo TXTTAB do BASIC). 

3480 Carrega REG-BC no campo de endereço da instrução 3490 
(D06> . 

3490 Carrega no REG-BC o conteúdo dos dois primeiros BYTES do 

programa. 

3500 Carrega REG-B em REG-A. 

3510 Compara REG-A com REG-C na modalidade QR. 

35P0 Caso o resultado da comparação anterior seja "Zero" 
(Indicador Z "Ligado”) é porque REG-BC contém #0000» o 
gue indica a condição de "Fim de Programa" já na primeira 
linha, ou seja, não há qualquer programa carregado. 

Nesta situação o BIT-BASIC não aceita o carregamento de 
um "Programa Adicional" e é efetuado desvio para a 
rotina RET03, o que resultará na apresentação da mensagem 
"ERRO DE SINTAXE". 


**»# As linhas 3530 a 3570 "procuram" □ final do programa BASIC 
corrente para posicionar neste ponto as variáveis BASIC. 


3530 

3540 

3550 D07: 

3560 

3570 


LD DE , (#F676) 
LD (T06 > ,DE 
CALL PXLIN 
JR NC, D07 
JR NZ,D07 


3530 Carrega no REG-DE o endereço de "Início do Programa 
Atual" (campo TXTTAB do BASIC). 

3540 "Salva" TXTTAB em T06 para possitji 1 itar o Retorno 
posterior ao programa atual. Este campo é também utilizado 
para indicar se há ou não "Programa Secundário' 
carregado. . 

3550 Efetua chamada à rotina PXLIN, para obter a Próxima 
Linha" do programa BASIC. B . , 

3560 Desvia para a instrução D07 para obter a Próxima Linha 
BASIC caso a condição de "Fim de Programa" nao tenha sido 
atingida (C,Z) . 

3570 Idem instrução 3560. _ 

Com o procedimento das linhas 3560 e 3570, a rotina PXLIN 
será repetida até "Devolver" a condição ^de "Fim de 
Programa” , quando o controle passará então par a a 
instrução seguinte (Instrução 3500). 
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*#*# As instruções das linhas 3580 a 3600 efetuam o 

reposicionamento das variáveis que apontam para o "Início 
do Programa BASIC". 

Estas variáveis passarão a apontar para um endereço de 
memória RAM "Após" o programa Primário. 

A inclusão posterior de um programa BASIC se dará a 
partir deste ponto, preservando intacto na memória o 
programa atualmente carregado. 

São as seguintes as variáveis BASIC/BIOS envolvidas no 
problema em questão (veja APÊNDICE 01): 

(Cada uma delas ocupa dois BYTES na memória RAM, e todas 
são automaticamente "Inicial izadas" pelo BIOS no momento 
em que o microcomputador é "Ligado".) 

TXTTAB ( #F676) - TEXT TABLE (Tabela de Texto) 

Início do "Texto BASIC" (Programa BASIC) 
B0TT0M (#FC48) - B0TT0M (Fundo) 

Início da memória RAM utilizada p/sistema 
VARTAB ( #F6CS) - VARIABLE TABLE (Tabela de Variáveis) 
Início "Area de Variáveis Simples" 

ARYTAB (#F6CA) - ARRAY TABLE (Tabela de Arranjos) 

Início "Tabela de Arranjos do BASIC" 
STREND ( #F6C6) - STORAGE END (Fim de Memória) 

Fim da memória "Em Uso" 

Destas variáveis somente as duas primeiras (TXTTAB e 
BDTTOM) serão^di retamente modificadas pelo BIT-BA5ÍC. 

As demais serão atualizadas pelo próprio BIOS, por um 
comando CLEAR acionado a partir do BIT-BASIC. 

Na situação inicial, quando o micro é ligado, B0TT0M 
aponta para #8000, que é a primeira posição da RAM, e 

primeira posição do programa. 


TXTTAB 

aponta 

para #8001, 

35B0 

LD 

( #F676) ,BC 

3590 

DEC 

BC 

3600 

LD 

(#FCA8),BC 


3580 Carrega REG-BC em TXTTAB. 

REG-BC contém o endereço do "Fim do Programa . 

Portanto, estamos fazendo com que a variável TXTTAB, que 
indica o "Início do Texto/Programa", passe a apontar para 
o BYTE imediatamente seguinte â última linha do programa 
BASIC atual. 

Como estas posições já contém #0000, já está presente a 
condição de "Nenhum Programa Carregado" (se a listagem do 
novo programa for solicitada, nada aparecerá). 

3590 Subtrai 1 de REG-BC, que passa portanto a apontar para o 
último BYTE da última linha do programa BASIC atual (este 
BYTE sempre contém #00), 

3600 Carrega REG-BC em BQTT0M. 

Portanto, estamos fazendo com que a variável BDTTOM, que 
indica o "Início da RAM", passe a apontar para o último 
BYTE da última linha do programa BASIC atual. 
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‘£# 4 * pç instruções des linhas 3610 a 3650 providenciam o 
retorno ao BASIC com a execução da instrução CLEAR* a 
qual inicializa os demais parâmetros já descritos* 


3610 008: 

LD 

HL , T05 

3620 

LD 

D£,#F55E 

3630 

LD 

BC, #06 

3640 

LDIR 


3650 

JP 

RET03 


3610 Carrega em REG-HL o endereça do campo T05, onde estâ 
armazenada a constante "CLEAR". 

3620 Carrega #F55E em REG-DE. 

3630 Carrega #0006 em REG-BC. 

3640 Movimenta (“Copia" > o número de BVTES indicado pelo 
REG-BC (06 BVTES) a partir do endereço apontado por 
REG-HL ÍT05), para o endereço apontado por REG-DE Í#F55E). 
Com isto colocamos a constante "CLEAR" a partir do 
endereço #F55E ÍBUFFER BASIC) > seguida de #00, pronta 
para ser executada. 

3650 Desvia para a rotina RET03, que fará com que o BASIC 
execute comandos armazenados a partir de #F55E como se 
tivessem sido entrados via teclado (sem apresentá-los 
na Tela) . 

A partir deste momento podemos então carregar um novo 
programa BASIC sem destruir o conteúdo daquele já 
carregado- 


18-5 - ROTINA AS5EMBLER ÍRETBAS) 

Esta rotina retorna as variáveis BASIC á situação original, de 
forma a termos novamente acesso ao programa que ficou 
“Escondido 1 * pela rotina N0V0BAS- 

Providencia também a execução da instrução CLEAR pelo BIOS. 

Aç instruções das linhas 3680 a 3730 confirmam se bá 
programa secundário carregado e posicionam o campo 106. 


3680 RETBflS: 

LD 

BC, (T06) 

3690 

LD 

A,0 

3700 

an 

C 

3710 

jp 

Z,RET03 

3720 

LD 

HL, #0000 

3730 

LD 

(T06) ,HL 


3680 Carrega T06 (campo ende é "Salvo" o endereço de início do 
programa primário) em REG-BC. 

3690 Carrega REG-B em REG-A. 

3700 Compara REG-A com REG-C na modalidade 0R- 

3710 Se T06 (REG-BC) contém #0000» a que indica que "Não há 
Programa Secundário Carregado", não aceita o comando de 
“Retorno", apresentando a mensagem K ERR0 DE SINTAXE" via 
rotina RET03* 
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37E0 Carrega #0000 em REG-HL. 

3730 "Desliga" o campo TG6, aí colocando #0000, p ara registrar 
□ fato de que não haverá programa secundário carregado 
(após a conclusão da rotina RETBAS)* 


*### As instruções das linhas 37^0 a 3810 
variáveis BASIC aos seus valores originais 
a execução da instrução CLEAR. 


'Retornam" as 
b encaminham 


3740 

LD 

HL, ( #F676 ) 

3750 

LD 

(#Fó?6>,BC 

3760 

DEC 

BC 

3770 

LD 

<#FC48) ,BC 

3780 

LD 

(HL) ,#00 

3790 

INC 

HL 

3800 

LD 

< HL ) , #00 

3810 

JP 

D0B 


37A0 Carrega em REG-HL o “Endereço de Início" do programa 
secundário <aí colocado pela rotina NGVOBAS)* 

3750 Carrega no campo TXTTAB o conteúdo do campo T06 (REG-BC 

‘Endereço de Início" do programa primária, aí colocado 
pela Instrução 3600). 

3760 Subtrai 1 de REG-8C ■ 

3770 Coloca o valor de REG-BC no campo BQTT0M. 

3780 Coloca #00 no endereço apontado por REG-HL ("Primeiro 
BYTE imediatamente após □ primeiro programa")* 

3790 Incrementa REG-HL de uma unidade* 

3800 Coloca #00 no "Segundo BYTE após o programa primário". 
As instruções 3780 e 3000 restauram o ^conteúdo #0000 
nestes dois BYTES para indicar a condição de "Fim de 
Programa" . 

3810 Desvia para a instrução 3610 (DO0? que encaminhará a 
execução da instrução CLEAR pelo BIOS. 


18.6 - ROTINA ASSEMBLER ÍUNIBAS) 

Esta rotina efetua a "União" dos programas BASIC 
"Secundário" presentes na memória RAM. 
ísto é feito "Retornando ao Valor Original" as 
BASIC, sem no entanto re^tau^ar a condição de "Fim do 
Primário", com o que os dois programas presentes na 
ficam "Emendados" , um imediatamente após o outro. 

ÍÉ importante ressaltar que a numeração das tinhas 
ai terada * ) 

A rotina encaminha também a execução da instrução CLEAR 
BIOS. 


"Primário 11 e 

variáveis 
Programa 
mernòr \ a 


nao 


é 

pelo 
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38A0 UNIBAS: 

LD 

3850 

LD 

3860 

0R 

3870 

JP 

38B0 

LD 

3890 

LD 

3900 

LD 

3910 

DEC 

3980 

LD 

3930 

JP 
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BC , < T06 > 

A,B 

C 

Z.RET03 
HL, #0000 

< TOÓ ) , HL 

< #F676 ) ,BC 
BC 

(#FCA8) ,BC 
DOB 


3BA0 

3850 

3960 

3870 


3880 

3890 


3900 

3910 

39E0 


3930 


Carrega T06 em REG-BC (Endereço de Início do Programa 
Secundário) . 

Carrega REG-A em REG-B. 

Compara REG-A com REG-C na modalidade OR. 

Se REG-BC = ttOOOO, o que indica que não há programa 
secundário carregado, não aceita comando de "União", 
apresentando mensagem “ERRO DE SINTAXE" via rotina RET03. 
Carrega #0000 em REG-HL. 

"Desliga" o campo T06, aí colocando #0000, para registrar 
o fato de que não haverá programa secundária carregado 
(após a conclusão da rotina UNIBAS) . 

Retorna ao campo TXTTAB o seu valor original (REG-BC = 


T06) . 

Subtrai 1 de REG-BC. 

Armazena REG-BC no campo B0TTQM. 

Com i 5 1 D as variáveis TXTTAB e BGTT0M retornam aos 
valores que correspondem ao primeiro programa BASIC 
(#8001 e #8000 em condições normais). 

0 "Fim do Programa Primário" não é restaurado, 
permanecendo o endereço de "Fim do Programa Secundário". 
Desvia para a Instrução 3610 (DOB) que encaminhará o 
retorno ao BASIC, com execução da instrução CLEAR. 
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1 — ROT I IMA VERCTE 

19.1 - OBJETIVO 

3 objetivo desta rotina é procurar em um programa BASIC as 
linhas que contém uma dada constante* apresentando na Tela 
estas linhas "Prontas para Edição" ■ 

Esta nova função disponibilizada pelo BIT-BASIC è útil* por 
exemplo* quando precisamos modificar o nome de uma variável 
çta vários pontos de um programa BASIC * ou quando prec i samos 
verificar as linhas onde está sendo utilizado um determinado 
comando ou variável. 

São apresentadas na Tela somente as linhas do programa onde 
esta constante é ref erenciada * prontas para serem normalmente 
“Editadas* {Modificadas, Excluídas) pelas funções disponíveis 
no BASIC e no BIT-BASIC. 

Sem estas funções teríamos que percorrer * Visualmente* todo o 
programa* selecionando as linhas desejadas. 


19.2 - SINTAXE E FUNÇflES DOS COMANDOS. 

19.2.1 - PESQUISA CONSTANTE 
Sintaxe : = ccc 

Função : Pesquisa as linhas do programa BASIC e lista na ^Tela 
aquelas que contém a constante ccc <até 20 posições). 
Exemplos: -Xl% Procura linhas que contém "xl%" 

=PRINT Procura linhas que contém "PRINT 11 

19.8.2 - CDNTINUAÇÕO DE PESQUISA. 

Sintaxe : == ii M 

Função : Continuação da pesquisa em caso de "Tela Completa . 


19.3 - CARACTERÍSTICAS. 

Esta rotina é acionada quando a primeira posição do comando 
BIT-BASIC contém o caráter "=* (#3D). 

As linhas do programa BASIC que contém a constante desejada 
ficam disponíveis para edição sob o BAS1C/BIT-BA5IC. 

A pesquisa é sempre inic iada^pela primeira linha do programa 
e os caracteres alfabéticos são pesquisados tanto na condição 
de "Minúculos" como de "flaiúsculos" . 

Se as linhas que contém a constante desejada ocupam toda a 
Tela a listagem é interrompida. É possível "Continuar" a 
pesquisa utilizando o comando "==" 

Inicialmente, a constante é obtida e ‘'Salva 1 '* em uma área de 
trabalho* para em seguida ser efetuado □ desvio para as rotinas 
encarregadas de Listar Página ÍLISTAPG) que, por sua vez* se 
utilizam de outra rotina ( VERCHR) para verificar em cada uma 
das linhas se a constante está ou não presente. 
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19.4 

**## 


3960 

3970 

3980 

3990 

4000 

4010 

3960 

3970 

3980 

3990 

4000 

-4010 


■»*•*•* 


40 EO 
4030 
4040 
4050 
4060 
4070 
4090 
4090 
4100 
4110 
4 ISO 
4130 
4140 

4020 

4030 

4040 

4050 

4060 

4070 

4080 


- ROTINA ASSEMBLER (VERCTE) 

Esta rotina "Salva" a constante a ser pesquisada e desvia 
para a rotina que "Lista Página". 

As instruções 3960 a 4010 verificam a função a ser 
executada (Pesquisa ou Continuação). 

VERCTE: CALL RST10 

JP 2,RET03 
CP #3D 
JR Z,E03 
LD BC, #0000 
LD ( T03 ) ,BC 

Obtém próximo caráter do comando 8IT-BASIC. 

Se não há nenhum caráter, desvia para RET03 (ERRO). 

Compara REG-A com "=" (#3D) . 

Se próximo caráter é “=“ desvia para 4150 (E03) que 

fará a "Continuação" da pesquisa (Comando "==“). 

Carrega #0000 em REG-BC. 

Carrega #0000 em T03 (número da próxima linha a ser 
listada), com o objetivo de "Forçar' 1 a pesquisa desde a 
primeira linha do programa. 


As instruções das linhas 4020 a 4140 obtém e salvam a 
constante a ser pesquisada. 


LD 

DE , T09 

LD 

(DE) ,A 

INC 

DE 

CALL 

RST10 

JR 

Z,E02 

LD 

(DE) , A 

INC 

DE 

LD 

A, (DE) 

CP 

#FF 

JP 

Z, RETOS 

JR 

E01 

XOR 

A 

LD 

(DE) , A 


Carrega em REG-DE o endereço do CAttPG T09 (onde a 
constante a ser pesquisada é armazenada). 

Carrega RÊG-A (primeiro caráter da constante) no primeiro 
BYTE do campo T09 (apontado pelo REG-DE). 

Adiciona 1 ao REG-DE, que passa a apontar para o BYTE 
seguinte de T09. 

Obtém próximo caráter da constante. 

Caso tenham terminado os caracteres fornecidos, desvia 
para a instrução 4130 (£02) . 

Carrega REG-A (próximo caráter) em T09. 

Adiciona 1 ao REG-DE. 
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4090 Carrega no REG-A a posição de T09 "Seguinte ao Último 
Caráter Armazenado 11 . 

0 objetivo é verificar se já foi atingido o final do 
campo de trabalho T09 (20 BYTES)* 

4100 Compara REG-A com #FF (o final de T09 é indicado por #FF.) 
4110 Caso o final de T09 tenha sido alcançado, desvia para a 
rotina RET03 (ERRO) . 

4120 Desvia para a Instrução 4050 <E01) para obter e salvar o 
próximo caráter da constante* 

4130 " Zera" o conteúdo de REG-A (após toda a constante ter 
sido alocada em T09). 

4140 Coloca #00 logo após a constante armazenada (para 
funcionar como indicador de "Fim da Constante"), 


+#** As instruções das linhas 4150 a 4210 efetuam os 
preparativos finais para o início da pesquisa e desviam 
para a rotina que "Lista Página". 


4150 E03: 
4160 
4170 
4180 


LD A,#FF 
LD ( T07 ) , A 
LD A) #0C 
RST #10 


4190 LD HL, 108- 1 

4200 CALL IMPL 

4210 JP LISTPG1 


4150 Carrega #FF em REG-A. 

4160 "Liga" com #FF o campo T07 , para indicar è rotina de 

“Lista Página" que está sendo processado um comanda de 

"Pesquisa de Constante". 

4170 Carrega #0C em RE6-A. 

4180 "Limpa" a Tela (veja Instrução 1940, item 11-12.4). 

4190 Carrega em RES-HL a "Endereço da Constante Armazenada -1" 

(precedida do caráter = 

4200 Efetua a apresentação na tela da constante fornecida, 
precedida de " = " . 

4210 Desvia para o Ponto de Entrada LISTPG1 da rotina LI5TAPG a 
qual fará a apresentação de uma Página somente com linhas 
que contenham a constante solicitada. (Esta verificação 
será feita pela rotina ^ERCHR, que será chamada em razão 
do campo T07 estar "Ligado",) 


19,6 - ROTINA ASSEhÜLEP ÍVEFCHR) 


*#** Esta rotina ê "Chamada" pela rotina que "Lista Página" 
UMPLIN) , para cada linha do programa BASIC, verificando 
se a constante fornecida no comando fl = " do BIT-BAS1C está 
oo não presente. 
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4240 

VERCHR: 

LD 

HL,#F55D 

4250 

£10: 

LD 

DE »T0B 

4260 


PUSH 

HL 

4270 

EU: 

INC 

HL 

4280 


INC 

DE 

4290 


LD 

A, (DE) 

4300 


CP 

#00 

4310 


JR 

Z,E13 

4320 


LD 

A,C 

4330 


LD 

A, (HL) 

4340 


CP 

#00 

4350 


SCF 


4360 


JR 

Z.E13 

4370 


CP 

C 

4380 


JR 

Z,E11 

4390 


CP 

#41 

4400 


JR 

C,E12 

4410 


CP 

#5B 

4420 


JR 

NC.E12 

4430 


ADD 

A ,#20 

4440 


CP 

C 

4450 


JR 

Z,E1 1 

4460 

E12: 

POP 

HL 

4470 


INC 

HL 

4480 


JR 

E10 

4490 

E13: 

POP 

HL 

4500 


RET 


4240 

Carrega 

#F55D 

em RE6-HL (endereço onde a linha BASIC a 


ser pesquisada 

é colocada, já "Decodificada"). 

4250 

Carrega 

em REG 

-DE o endereço do campo T08 (constante a 


ser pesquisada 

precedida de ' , =" ). 

4260 

Salva REG-HL na PILHA. 

4270 

Soma 1 

em REG - 1 

HL. 

4280 

Soma 1 

em REG- 

DE. 

4290 

Carrega 

em REG 

-A o prÓKimo caráter da constante. 

4300 

Compara 

REG-A 

com #00. 

4310 

Se REG- 

A = #00 

, o que significa que toda a constante já 


foi pesquisada 

, desvia para a instrução 4490 (£13), que 


fará o 

retorno 

ao ponto de chamada de VERCHR com a 


condição ”NC H 

no Indicador CY, indicando que a presente 


linha " 

Contém" 

a constante fornecida. 

4320 

"Salva" 

REG-C 

em REG-A. 

4330 

Carrega 

em REG-A o próximo caráter da Linha BASIC. 

4340 

Compara 

REG-A 

com #00. 

4350 

"Liga" 

o Indicador de Estado CY- 

4360 

Se REG- 

A = #00 

. que significa que o Fim da Linha 


BASIC" 

foi alcançado t desvia para a instrução *+490 (Et3) t 


fazendo 

o ret 3 rno ao ponto de chamada de VERCHR com a 


condição "C* no Indicador CY, indicando que a presente 
linha "Nãc Contém" a constante fornecida. 
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As instruções das linhas 4370 a 4450 camparam o caráter 
d$ constante fornecida com o caráter da linha BASTC, 
nos formatos "Maiúsculo" e "Minúsculo". 

(Todos os caracteres da constante já foram convertidos 
pára "Minúsculos" na rotina INICIO.) 

4370 Compara REG-A com REG-C (Caráter “Minúsculo" da Constante 
com Caráter da Linha BASIC). 

43B0 Se REG-A = REG-C (caracteres iguais), desvia para a 
instrução 4270 (Eli) para comparar os próximos 

caracteres. 

4390 Compara REG-A com "A" (#41). 

4400 Se REG-A menor do que #41, o que indica Caráter da 
Constante Não-Alfabético", desvia para 4460 <E12>. 

4410 Compara REG-A com #5B (caráter imed iatamente seguinte a 
"Z" = #5A). 

4420 Se REG-A não é menor do que #5B (caráter nãü-alfabético) , 
desvia para 4460 (E12), 

4430 "Transforma" caráter alfabética "Maiúsculo" de REG-A em 
“Minúsculo" . 

4440 Compara REG-A com REG-C. 

4450 Se REG-A = REG-C (caracteres da Constante e da Linha 
iguais), desvia para a instrução 4270 (Eli) para comparar 
os próximos caracteres. 

+*■*■* As Instruções 4460 a 4480 retomam a comparação da 
constante (os primeiros caracteres pesquisados eram 
iguais, mas não toplos). 

4460 Restaura em REG-HL, a partir da PILHA, o endereço do BYTE 
da linha BASIC a partir do qual foi iniciada a comparaçao 
com a constante, "Salvo" pela instrução 4260. 

4470 Adiciona 1 ao REG-HL, que passa a apontar para o próximo 
caráter da linha de programa BASIC. 

4480 Desvia para a instrução 4250 (E10), re-iniciando a 

comparação da constante fornecida a partir do próximo 
caráter da linha BASIC. 

+**# As Instruções 449074500 retornam ao ponto de chamada de 
VERCHR. 

4490 Restaura a PILHA à sua posição original. 

4500 RETORNA ao ponto de chamada de VERCHR, com o Indicador CY 
posicionado em "NC" ou "C" para indicar a existência ou 
não da constante na linha pesquisada. 
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80 — ROT X IMA COFMOV 

20.1 - OBJETIVO 

0 objetivo desta rotina é "Copiar 14 ou * Mover" uma Unha de 
programa BASIC » ou um conjunto de linhas i de sua posição atual 
para outra posição neste programa. 

Esta nova função ê útil» por exemplos quando queremos inverter 
a posição tíe trechos do programa BASIC» ou quando queremos 
"Duplicar 11 um trecho de programa» ou ainda quando queremos 
inserir numa posição determinada uma rotina que m já havia sido 
previamente preparada e que foi "Adicionada" ao final do 
programa atual pelo comando ".z" do BIT-BA5IC, 


20.2 - SINTAXE E FUNÇÕES DOS COMANDOS. 

80.2,1 - COPIA LINHAS 
Sintaxe : .caaa*bbb , cce 

Função : Copia linhas de números aaa até bbb* após a linha de 

número ttc ÍDE/ATÉ-Opc ional/APÓS ) . 

Exemplos t .cl30,150,20 Copia linhas 130 a 150 após linha 20 
.c 130,i 20 Copia linha 130 após linha 20 


20.8.2 * MOVE LINHAS 
Sintaxe i .maaa*bbb*ccc 

Função : Move linhas de números aaa até bbbj após a linha de 

número ccc (DE/ATÉ-Opc ional/APÓS ) . 

Exemplos : . ml30*20 Move linha 130 para apôs linha 20 

■rol30, 150*20 Move linhas 130 a 150 após a linha 20 


20.3 * CARACTERÍSTICAS 


Na CÓPIA de linhas* as Linhas DE/ATÉ permanecem no programa. 
Na MOVIMENTAÇao de linhas* as Linhas DE/ ATÉ são eliminadas. 

Não é necessária a existência no programa das Linha DE/ATÉ * 
sendo porém obrigatória a presença da Linha-APÓS para que as 
funções de Cópia ou de Movimentação funcionem com sucesso. 
No caso de “Movimentação de Linhas ' * todas as referências a 
cada uma delas ÍGOTü/GOSUB) passam a apontar para os seus 
"Novos Números 44 correspondentes. 


Para ambas as funções* as novas linhas geradas são numeradas 
de 1 em 1 * com numeração iniciando no “Número da Linha-APÓS 
mais 1% e o procosso é automaticamente interrompido quando 
esta numeração alcança a linha "Seguinte à Li nha-APÓS 44 , 
Por exemplo* para o comando N ,c!30 ? 150, 20" se entre as linhas 
de números 130 e 150 existem 10 linhas de programa BASIC* e se 
a linha seguinte á linha de número 20 possui numero 25* 
somente quatro das dez linhas solicitadas serio copiadas <sob 
os números 21* 22* 23 e 2^ í . 
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Para "Abrir" um intervalo maior entre as linhas, de forma a 
poder “Encaixar'* a quantidade desejada, pode ser efetuada uma 
"Falsa Movimentação", renumerando as linhas porém mantendo-as 
na mesma "Posição Relativa". _ n n 

No caso do exemplo, poderiamos ter feito .meS^O.-jO com o 
que as linhas E5 a 30 passariam a possuir numeraçao a partir de 
51, porém permaneceriam no mesmo local. após a 

linha 20 passaríamos a ter um intervalo de 51-20-1=30 numeros 
comportando então 30 "Novas Linhas . 


20. A - ROTINA ASSEJ1BLER (CQPMOV). 


4 #*-» As instruções 4530 a 4740 obtém os parâmetros DE/ATÉ/ APÔS 
a partir da linha de comando, salvando-os em áreas de 
trabalho. 


4530 COPMOV: 

LD 

( T15) ,A 

4540 

CALL 

PARM 

4550 

JP 

C.RET03 

4560 

LD 

(TIO) , DE 

4570 

INC 

DE 

4580 

LD 

(TU ) ,DE 

4590 

CALL 

RST10 

4600 

CP 

#2C 

4610 

JP 

NZ , RET03 

4620 

CALL 

PARM 

4630 

JP 

C,RET03 

4640 

LD 

( T 1 2 ) , DE 

4465 

CALL 

RST10 

4660 

CP 

#2C 

4670 

JR 

NZ,H00 

4680 

PUSH 

DE 

4690 

CALL 

PARM 

4700 

POP 

BC 

4710 

JP 

C,H00 

4720 

INC 

BC 

4730 

LD 

(TU ) ,8C 

4740 

LD 

( T 1 2 ) »DE 

4530 "Salva" 

em T15 

□ "Tipo I 


t'*c" ou "m"). 


4540 Obtém 
4550 . Desvia 
4560 
4570 
4580 


para 


reavia «* RET03 se parâmetro incorreto (ERRO). 
"Salva" primeiro parâmetro e» T10 (Linha-DE). 

Adiciona 1 ao REG-DE (Primeiro Parâmetro). 

"Salva" REG-DE (Linha-DE + lí em TU (Linha-ATÉ +1), 
o caso do parâmetro Linha-ATÉ ter sido omitido. 

4590 Obtém próximo caráter da linha de comando (em 
4600 Compara REG-A com (#20. _ M „ 

4610 Desvia para RET03 se o próximo caráter nao é , 

4620 Obtém novo parâmetro numérico. 

4630 Desvia para RET03 se parâmetro inválido (ERRO). 

4640 Salva parâmetro. em T12 (Linha-APtJS) . 

4650 Obtém próximo caráter da linha de comando era 
4660 Compara REG-A com (#20. 


para 
REG-A). 
(ERRO) . 


(REG-A). 
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Desvia para a instrução 4750 (HOQ) em caso de nao existir 
uma vírgula (#20 após o segunda parâmetro numérica 
(assume somente dois parâmetros). 

46B0 Salva na PILHA o último (Segundo) parâmetro numérico 
obtido. 

Obtém próximo (Terceiro) parâmetro numérico. 

Coloca em REG-BC, a partir da PILHA, o segundo parâmetro 

numérico. . _ . 

4710 Se o terceiro parâmetro numérico nao é valido, desvia 
para a Instrução 4750 (HOO) (assume dois parâmetros). 

Soma 1 ao REG-BC. 

Coloca REG-BC (Segundo parâmetro +1 
em Til (Linha-ATÉ mais 1). 

4740 Coloca RE6-DE (Terceiro parâmetro) 


4670 


4690 

4700 


4720 

4730 


*#*# As instruções das linhas 4750 
a Linha-APtíS no programa BASIC. 


Linha-ATÉ mais 1) 
(Linha-APtíS ) . 
4B10 "Procuram" 


em T12 


4750 

HOO: 

LD 

( T03) ,DE 

4760 


LD 

DE, (#F676) 

4770 

H01: 

CALL 

PXLIN 

4780 


JR 

NC , H02 

4790 


JP 

Z,RET04 

4800 


JR 

H01 

4810 

H02: 

JP 

NZ , RET04 

4750 

Coloca 

REG-DE 

(número da 


inha-APÓS) em T03 (campo 
utilizado pela rotina pxlín para comparação). 

4760 Carrega em REG-DE o endereço de início do programa (Lampo 
TXTTAB do BASIC). 

4770 Obtém "Próxima Linha" dD programa BASIC. 

47B0 Se o "Número da Linha Recuperada" é Maior ou Igual a 
T03, desvia para a Instrução 4810 (H02). _ , . 

4790 Se condição <C,Z> = "Fim do Programa" ÍL inha-APÓS nao foi 
encontrada), desvia para a rotina RET04, que efetua 
retorno normal ao BASIC, sem executar qualquer copia ou 
movimentação de linhas. 

4800 Desvia para a instrução 4770 (H01) para continuar o 

processo de busca da Llnha-APÓS. „ 

4810 Se a condição <NC,NZ) for alcaneada (Linha-APÚS nao foi 
encontrada), desvia para RET04 tidem Instrução 4790). 

**** As linhas 4820 a 4910 obtém o "Número da Linha-LIMITE" 
(linha imediatamente seguinte à Linha-APOS). 


4820 

4830 

4840 

4B50 

4860 

4870 H03: 

48B0 

4890 

4900 H04: 
4910 H05s 


CALL PXLIN 
JR NC , H03 
LD BC, #FFF5 
JR H05 
DEFS 30 
INC BC 
INC BC 

LD (H04+2) ,BC 
LD BC, (#0000) 
LD (TI 3), BC 
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4620 Obtém próxima linha BASIC (linha seguinte à Linha-APÚS) . 

4830 Se nova linha foi obtida, desvia para a instrução 4B70 
(H03) (REG-BC contém o Número desta linhal. 

4840 Se o "Fim do Programa" foi encontrado (a Linha-APÓS era a 
última linha do programa), assume 65525 (#FFF5) como 

"Slúmero da Linha-L IMITE" (REG-8C). 

4850 Desvia para a instrução 4910 (H05). 

4860 BYTES livres para adaptação do BIT-BA5IC. 

4870 Adiciona 1 ao REG-BC. 

4880 Adiciona 1 ao REG-BC, que passa a apontar para o terceiro 
BYTE da linha (Número da Linha). 

4B90 Carrega REG-BC no campo de endereço da Instrução seguinte 
(4900 = H04). 

4900 Carrega em REG-BC o "Número da Linha ímediatamente 
seguinte á Linha-APóS. 

4910 "Salva" REG-BC em T13 (Número da L inha-L IMITE ) . 


**** As linhas 4920 a 4960 preparam as condições para a busca 
das linhas DE/ATÉ e execucão da sua cópia ou movimentação 
pelas rotinas CML01 e CMLQ2, pertencentes à rotina C0PI1OV. 


4920 LD BC, (T10) 

4930 DEC BC 

4940 LD í T03) ,BC 

4950 X0R A 

4960 LD ( #F414) ,A 

4920 Carrega T10 (Linha-DE) em REG-BC. 

4930 Subtrai 1 de REG-BC. 

4940 Carrega REG-BC em T03 (será utilizado pela rotina PXLIN 
para comparação). 

4950 "Zera" REG-A. „ „ „„ 

4960 Move #00 para o campo ERRFLAG do BIOS (ERROR FLAG — 
Indicador de Erro), armazenado no endereço #F414 da RAM. 
Este campo é utilizado para armazenar o Numero do Erro ■ 
em caso de ocorrência de erro, e será utilizado pelo 
BIT-BASIC para detectar um erro eventual durante os 
procedimentos de CÓPIA/HOVIMENTACAQ de linhas. 


***# Na sequência, segue para a rotina CHL0! para dar 
continuidade aos procedimentos da rotina C0PM0V. 


20.5 - ROTINA ASSEMBLER (CML0I) 

Esta rotina obtém a "Próxima Linha 1 *, entre as Linhas DE/ATÉ, e 
efetua a Cópia ou Movimento desta linha para o novo 
local (Número) desejado. 

Para que a linha em processo seja "Incluída* 1 no programa BASIC 
sob outro número, é utilizada uma técnica que deixa para o 
próprio BASIC as tarefas de "Codificação" e Inserção da 
linha. 
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ísto é feito para não ser necessário ^Tratar" con ' 05 complexos 
procedimentos que executam estas funções. 

Por exemplo, a conversão dos comandos efuncoes BASIC nos 
TOKENS (Códigos) correspondentes, ou a Inclusao/EIiminapao 
de linhas BASIC (com o que as linhas sao ’ realocadas na 
memória, pois elas são sempre armazenadas na mesma ordem de sua 
numeração. ) 


desejada , 
"Simular” 
o que o 
todas as 


A técnica utilizada é a de colocar na Tela a linha 
já soD o novo número, e acionar a rotina RET01 para 
o acionamento da tecla RETURN sobre esta linha, com 
BASIC fará a sua captura e tratamento, executando 
funcÕes "Complexas" anteriormente mencionadas. 

Para isto é necessário devolver temporariamente o controle ao 
3ASIC, para cada linha Copiada ou Movimentada» e 
póster iormente retornar o controle ao BIT-BASIC. 

0 controle è passado ao BASIC, via rotina RET01, e para que 
seja devolvido ao BIT-BASIC utilizamos agora o GANCHO 
instalado no início da ROTINA PRINCIPAL (MAIN-ENTRY ) do BASIC 
(após o tratamento da "Nova Linha" haverá sempre a passagem 
por este ponto). 

Neste GANCHO instalamos um novo desvio para a rotina DESVIO, e 
"Ligamos" o Indicador T19 para indicar que há um comando 
de CÒPI A/MOV IMENTAÇSO sendo processado, com o que a rotina 
INÍCIO devolverá o controle para a rotina COPMOV (CKL02) para a 
continuação do processo- 


As rotinas CML01 e CML02 são repetidas para cada nova linha a 
ser processada. 


4980 CML01 : 

4990 

5000 

5010 

5020 


LD A,#C9 
LD í #FF0C) ,A 
LD ( T19 ) , A 
CALL #00B7 
JP C,RET04 


4980 Coloca #C9 em REG-A. 

4990 "Desliga" o GANCHO do início da ROTINA PRINCIPAL do 
BASIC, instalado a partir do endereço #FF0C, ^movendo para 
este endereço o valor #C9, que ê uma instrução RET para o 
Z-80. 

Isto é feito para o caso de "Retorno Final" ao BASIC nas 
próximas Instruções, sendo este GANCHO posteriormente 
"Religado" se necessário. 

5000 "Desliga" o indicador de "Comando de CÓPIA/MDVIMENTAÇSO 
em Progresso" (Campo T19). ^ 

Idem observações da Instrução 4990. 

5010 Efetua chamada à rotina ÔREAKX do BIOS (verifica 

CONTR0L+ST0P) . 

5020 Caso as teclas CCiNTRÜL e STÜP estejam sendo 

simultaneamente pressionadas na passagem do BIT-BASIC 
peia rotina DREAKX (Indicador CY "Ligada"), o processo de 
CÓPIA/MOVI MENTAÇSO é interrompido neste ponto. 

Isto è feito para possibilitar ao usuário interromper o 
processa antes do seu final (via rotina RET04). 
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**** 

As Instruções 
processamento 

5030 a 5050 verificam se ocorreu erro na 
da linha anterior pelo BASIC. 

5030 

LD 

A» ( #F4I4) 

50A0 

CP 

#00 

5050 

JP 

NZjRETO# 


5030 Carrega o campo ERRFLAG em REG-A . 

5CA0 Compara ERRFLAG (REG-A) com #00. 

5050 Se ERRFLAG diferente de “Zero", a que significa que algum 
erro ocorreu no processamento da linha BASIC anterior 
(por exemplo, o BASIC tentou incluir uma nova linha e n3o 
havia mais espaça disponível na memória para isto), 
retorna ao BASIC via rotina RET04 (retorno normal), 
encerrando a rotina COPHOV. 


***# As instruções das linhas 5060 a 5110 "Percorrem" o 
programa BASIC via rotina PXLIN, até ser encontrada a 
"Linha-DE menos 1" (é este o número contido no campo T03, 
utilizado pela rotina PXLIN para comparação, aí colocado 
pela instrução da linha 49A0). 

Como será procurada uma linha de número "Maior que 
Linha-DE menos 1", não é necessário que a Linha-DE esteja 
presente no programa 8ASIC para que a função de Cópia ou 
Movimentação seja executada com sucesso. 

A PESQUISA É SEMPRE EFETUADA DESDE 0 INÍCIO D0 PROGRAMA, 
POIS A CADA INCLUS250/EXCLUSSO DE LINHAS VIA ROTINA CGPM0V 
0 PROGRAMA É "REALOCADD" NA MEMÓRIA . 


5060 

5070 H07 : 
5080 
5090 
5100 


LD DE, (#F676> 
CALL PXLIN 
JR NC , H08 
JP Z.RET04 
JR H07 


5110 HO0: JR Z.H07 


5060 Carrega em REG-DE o endereço de início do programa BASIC 
(Campo TXTTAB) . 

5070 Obtém "Próxima Linha" do programa BASIC. 

50BO Se a linha obtida é menor do que a "Linha-DE menos 1", 
desvia para a Instrução 5110 (HO0) . 

5090 Se "Fim do Programa" (C,Z>, ou seja, a "Linha-DE menos 1" 
não foi encontrada, desvia para a rotina RETOA (retorno 
normal ao BASIC), interrompendo o processo. 

5100 Se as condições anteriores não ocorreram, desvia para a 
Instrução 5070 (H07) para continuar o processo de busca 
da Linha-APÓS. 

5110 Se Número da linha BASIC igual a T03 (Linha-DE menos 1), 
desvia para a instrução 5070 (H07) para recuperar a linha 
seguinte . 
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**** As Instruções das linhas 5120 a 5150 verifica© se a 
Linha- ATÉ já foi alcançada (encerrando □ processo em caso 



afirmativo) . 


5150 

LD 

(TOl ) ,HL 

5130 

LD 

DE, (TU) 

5140 

RST 

#30 

5150 

JP 

NC,fíETQ4 


5120 Salva REG-HL no campo T01 < número da linha BASIC a ser 
Copiada/Moví mentada) , 

5130 Carrega Til (Número da Linha-ATÉ mais 1) em REG-DE. 

51A0 Efetua chamada á rotina OCOflPR da BIOS, que compara REG-HL 
com REG-DE, 

5150 Se RE6-DE *Nao ê Maior " que REG-HL, ou seja, se "Linha-ATÉ 
fiais 1" "Não é Maior" que a "Linha Atual"» ou ainda, se a 
“Linha Atual" è "Maior" que j "Linha-ATÉ"» encerra o 
processo de Cópia ou Movimentação (via rotina RETO^tK 


fis linhas 5160 a 5210 abtém o número da NOVA LINHA a ser 
incluída e verificam se este número nlo ultrapassa a 
LINHA LIMITE. 


5160 

LD 

DE, (T13) 

5170 

LD 

HL, (TIS) 

5190 

INC 

HL 

5190 

LD 

( T 1 5 ) , HL 

5500 

RST 

#50 

5510 

JP 

NC,RET04 


5160 Carrega TI3 (Linha-LIMITE) em REG-DE, 

5170 Carrega TI 2 (Linha-APÓS) em REG-HL. 

5180 Soma 1 em REG-HL < Linha- APÓS > . 

Este número será utilizado como NÚMERO DA LINHA NOVA a 
ser incluída pelo BIT-BASIC. 

5190 Retorna REG-HL para T12* que passa a conter o "Número da 

Linha-APÓS mais i"p sendo Ti 11 a quantidade de linhas já 

processadas* 

Com isto passamos a utilizar o campo T12 para armazenar o 
número da "Linha- NOVA" que está sendo inserida pelo 
BIT-BASIC . 

5200 Compara REG-HL com REG-DE. 

5210 Be REG-DE "Nao é Maior" que REG-HL, ou seja, se 

Linha-LIMITE "Não é Maior" que Linha-NDVA, interrompe o 

processo via rotina RETOA, 

Com este procedimento, as linhas Copiadas ou Movimentadas 
(sob nova numeração) utilizam somente o intervalo 
disponível entre a "L inha-APÚS" e a "Linha Seguinte á 
Linha-APdS" (“Linha-LIMITE). 
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*#** As linhas 5220 a 545G colocam na Tela a linha a ser 
Copiada/Movimentada * sob o NOVO NÚMERO- ^ . u 

Caso o comando corrente seja de "Movimentação de Linhas * 
as instruções 5260 a 5400 fazem com que as outras que 
apontem para ela ( InstruçõesGOTO/GQSUB) passem a apontar 
para o seu w Novo Número 11 . 


5220 

LD 

A, (T15) 

5230 

LD 

( T18) i A 

5240 

CP 

#63 

5250 

JR 

Z,H11 

5^60 

PUSH 

BC 

5270 

PUSH 

BC 

5200 

POP 

IX 

5290 

LD 

BC , #54F6 

5300 

CALL 

CALL 

5310 

LD 

BC, <T12> 

5320 

LD 

(IX +2) ,C 

5330 

LD 

( IX+3) ,B 

5340 

LD 

BC , #54F7 

5350 

CALL 

CALL 

5360 

LD 

BC, (T01) 

5370 

LD 

( IX+2) ,C 

53B0 

LD 

{ IX+3) ,B 

5390 

POP 

BC 

5400 

LD 

HL, (Tie> 

5410 NI 1 : 

CALL 

IMPLIN 

5420 

LD 

HL, (T01) 

5430 

LD 

(T03) , HL 

5440 

X0R 

A 

5450 

LD 

(T18) ,A 


5220 Carrega o conteúdo do campo T15 ( "c " ou w is“) em REG^A. 
5230 "Liga" o campo T 1 0 , que serve para indicar à rotina 
IMPTELA que "Não é Para Ser Verificada 1 * a condição de 
"Última Linha Inferior da Tela* 1 - 
5240 Compara REG-A com *'c". 

5250 Desvia para a instrução 5410 caso o comando atual 

seja para "Cópia de Linhas" (neste caso» instruções 
GQT0/G0SUB continuam apontando para a linha original 
5260 Coloca REG-BC na PILHA (endereço de início da linha a ser 
movimentada í - 

5270 Idem 5260- . , 

5280 Coloca último valor da PILHA em REG-IX (endereço de imno 
da linha a ser movimentada)- 
5290 Coloca em REG-BC o valor #54Fó- 

5300 Efetua chamada á rotina do Interpretador BASIC que imcia 
em #54F6j a qual executa a função de substituir todas as 
"referencias a números de linhas 11 de u* programa BASIC 
í Instruções GDTQ/G05UB) pelos "endereços destas linhas . 
Este procedimento é utilizado pelo Interpretador BASIC 
para agilizar a execução de um programa ÍRUN)* tornando 
desnecessária a "procura" da linha para a qual deve ser 
efetuado o desvia * a cada instrução G0T0 ou GQ5UB- 
Esta técnica è conhecida como "Apontadores Progressivos - 


eo 

5310 

5320 

5330 

5340 

5350 

5360 

5370 

5380 

5390 

5400 

5410 

5480 

5430 

5440 

5450 


II - ROTINA COPffOV 


Carrega em REG-BC o campo T12 inovo número da linha à ser 
movimentada > . 

Coloca REG-C na terceira posição da linha a ser 
movimentada* 

Coloca REG-B na quarta posição da linha a ser movimentada* 
As linhas 5320/5330 colocam o "Número Novo" da linha a ser 
movimentada no lugar do "Número Antigo" í Número-Atual ) * 

É importante observar que a linha não foi movimentada de 
sua posição originais ainda que seu número tenha sido 
alterado ^(o Interpretador BASIC não faz qualquer 
verificação a este respeito). 

Coloca em REG-BC o valor #54F7, 

Efetua chamada è rotina do Interpretador BASIC em #54F7, 
que "retorna 11 as referências a "endereços de linhas" para 
referências a "Números de Linhas"* 

Como a linha a ser movimentada teve seu "Número-Original M 
modificado para o "Número-Novo " * todas as linhas 
passarão a apontar para o seu "Número-Novo" após a 
execução desta rotina. 

Carrega em REG-BC o campo T01 inúmero original da linha a 
ser movimentada). 

Coloca REG-C na terceira posição da linha a ser 
movimentada* 

Coloca REG-B na quarta posição da linha a ser movimentada. 
As linhas 5370/5380 retornam o "Número Original" da linha* 
NESTE PONTO, A LINHA D0 PROGRAMA Á SER MOVIMENTADA ESTA 

AINDA EM SUA POSIÇSO ORIGINAL, CGM SEU NÚMERO ORIGINAL, 

PORÉM AS LINHAS QUE APONTAVAM PARA ESTE NÚMERO J4 ESTSO 

APONTANDO PARA 0 SEU "NOVO NÚMERO". 

0s próximos passos serão incluir esta linha com seu novo 
número e eiíminá-la com seu número antigo. 

Restaura em REG-BC □ endereço de início da 
movimentada, a partir da PILHA D0 SISTEMA. 

Restaura em RE6-HL o "Novo Número" da 

movimentada (Campo T12>* 

Efetua chamada á rotina IMPLIN, que fará a 
Tela da Linha-NOVA (linha atual do programa BASIC, 

N0V0 NÚMERO contido em REG-HL). 

0 processo não é interrompido caso a última linha da tela 
tenha sido atingida, em razão de estar "ligado" o campo 
T10 (Instrução 5830). 

As referências a esta linha (GOTO/GOSUB) já estão 


linha 
1 í nha 


ser 


ser 


colocação na 
sob o 


‘‘Novo Número* 


conforme descrito 


atualizadas para este 
anter iormente- 

Restaura em REG-HL o "Número Antigo" da Linha-Atual (TOl), 
"Salvo" pela Instrução 5120 . 

Carrega REG-HL (T01) no campo T03* 

As Instruções 5420/5430 "Recolocam" □ "Número Antigo" da 
Linha-Atual n^ r^mpo T 03, para obter a "Próxima. Linha" 
quando da passagem seguinte pela rotina PXL1N, 

(Este procedimento é necessário porque a rotina IMPLIN 
altera o valor de tq3 , ) 

"Zera" REG-A. 

Desliga "Contorno" da verificação de "última Linha" da 
Tela (Campo TIS ) * 


I 
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As linhas 5460 a 5510 posicionam o CURSOR sobre a 
LINHA-NOVA, e passam o controle ao BASIC, "Simulando'' o 
Press ionamento da tecla RETURN sobre esta linha. 


5460 Carrega em REG-HL o endereço da “Posição Vertical Atual" 
do CURSOR (CSRY - #F3Dt), que está posicionado na linha 
da Tela imediatamente seguinte à Linha-NOVA recém 
apresentada ta rotina IMPL deixa o CURSOR nesta posição). 

5470 Subtrai 1 do endereço apontado por REG^HL (CSRY - #F3DC), 
retrocedendo o CURSOR de uma iínha, o qual fica 
posicionado sobre a Linha-NGVA, recém colocada na Tela. 

5480 Coloca o valor #C3 em REG-A. 

5490 "Liga” o GANCHO instalado no endereço #FF0C, acionado no 
início da ROTINA-PRINCIPAL do BASIC, colocando caráter 
#C3 em sua primeira posição (código da instrução JUflP = 
DESVIO do Z-80) . 

0 endereço para o qual será efetuado o N0V0 DESVIO, após 
a conclusão do processamento da Linha-NOVA pelo BASIC, já 
foi previamente armazenado nos dois BYTES seguintes 
Í#FF0D/FF0E) pela rotina que efetua o carregamento do 
programa BIT^BASIC na memória. 

Este endereço é ttFFEB e correspondente ao Ponto de 

Entrada DVG1 da rotina DESVIO, que fará novamente a 
intercep tação do BASIC, com retorno do controle ao 
BIT-BA5IC. 

5500 "Liga” o campo T19, que indicará á rotina INICIO que está 
sendo processado um comando de CÚP IA/ MOV IMENTAÇfiO. 

5510 Devolve o controle ao BASIC via rotina RET01 , que fará a 
" Si mui ação" do pressionamento da tecla RETURN sobre a 
Linha-ATUAL, recém colocada na Tela, e posteriormente 
retornará o controle ao BIT-BASIC. 

0 retorno à rotina CÜPMÜV íCHLOS) é efetuado via rotina 
INICIO, que identifica por intermédio do campo T19 que há 
um comando de Cópia ou Movimentação "Sendo Executado". 

A rotina INICIO desvia então _para a rotina CÍ1L08, a 
seguir descrita, para continuação do processo. 


5460 

5470 

5480 

5490 

5500 

5510 


LD HL,#F30C 


DEC (HL) 
LD A,#C3 


LD t#FF0C),A 
LD ( T19 ) , A 
JP RET01 
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20. ó - ROTINA ASSEMBLER (CML02) 

Esta rotina obtém o controle a partir do GANCHO instalado no 
inicio da ROTINA-PRINCIPAL (MAIN-ENTRY) do BASIC, quando o 
desvid aíi instalado estiver "Ligado" ^pelos procedimentos já 
descritos para a rotina CML01 (Instruções 56B0/5510). 

Uma de suas funções é "Efetuar a eliminação da linha BASIC 
original", no caso de comando de MOVIMENTAÇÃO de linhas. 

A' outra função é "Retornar à rotina CML01 para o processamento 
da linha BASIC seguinte". 


**** As instruções 5560 a 5560 devolvem o controle à rotina 
CML01, caso o comando em processo seja CÚPIA de linhas. 

5560 CML02: LD A, (T15) 

5550 CP #63 

5560 JR Z,CML01 

5560 Coloca o campo T15 (tipo de Comando, "c" ou "m" > . 

5550 Compara REG-A com "c" (#63). 

5560 Caso o campo T15 contenha "c“ , desvia para a rotina CHL01 
para conti nuação do processo de CdP I A de linhas. 


■*»** Como no caso de "Movimentação de Linhas" a rotina CML02 
recebe o controle duas vezes a cada linha BASIC processada 
(a primeira após a inserção da Linha-NOVA, e a segunda 
após a "Eliminação" da Linha-DPIGINAL ) , as Instruções 5570 
a 5600 verificam se a passagem pela rotina CML02 
está sendo feita pela primeira ou segunda vez. ^ <( 

A técnica empregada utiliza um "FLIP-FLQP 

( "LIGA-DE5LIGA" 1 sobre o campo T16 (originalmente 
"Desligado" - #00), 

LD A, ( T16 ) 

X0R #FF 
LD (T16),A 
JP Z,CML01 

5570 Carrega T16 em REG-A. 

5580 Efetua a comparação de REG-A com o valor #FF , BIT a BIT, 
na modalidade "XOR", colocando o resultado em REG-A. 

Esta instrução "Inverte" os valores “0“ ou "1" dos BITS 
de REG-A, que conterá alternadamente os valores #00 e #FF 
a cada nova passagem por esta instrução. 

5590 Retorna REG-A "Invertido" para T16. 

5600 Caso o resultado da operação X0R sobre REG-A resulte em 
#00 (aqui o Indicador Z é "Ligado"), desvia H P ara a 
rotina CML01, pois isto indica que esta a Segunda 

passagem para a 1 inha BASIC atual (a El iminaçao da 
Linha-ÜRIGINAL já foi efetuada). 

Caso o resultado da operaçao X0R seja #FF, segue para a 
Instrução seguinte, para "Eliminar" a Linha— ORIGINAL . 


5570 

5580 

5590 

5600 
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As instruções 5610 a 5660 fazem com que a BASIC efetue 
ã "El iminação" da L inha-ANTERIOR > colocando na Tela 

somente o número desta linha í seguido de “Brancas")» e 
simulando o acionamento da tecla RETURN sobre este 

número. 


5610 

LD 

A, #20 

5620 

RST 

#18 

5630 

LD 

HL, (T01 > 

5640 

LD 

BC, #3412 

5650 

CALL 

CALL 

3660 

JP 

RETQ1 


5610 Coloca #20 ("Branco") em REG-A. 

5620 Apresenta o caráter "Branco" na tela. 

Neste^ momento o CURSOR está posicionado na primeira 
posição da linha seguinte á Linba-NOVA recém Inserida <a 
simulação da tecla RETURN sobre esta linha deixa o CURSOR 
nesta posição) . 

Este caráter "Branco” é apresentado antes do número da 
linha a ser "Eliminada 11 para proporcionar um efeito 
visual de "Deslocamento", 

5630 Carrega T01 em REG-HL (número da linha a ser "E 1 iminada" , 
"Salvo" pela instrução 5120). 

5640 Coloca o endereço #3412 em REG-BC, 

5650 Coloca na Tela o número da Linha-QRIGINAL (veja item 
11-13.4, instrução 2320). 

5660 Devolve o controle ao BASIC, via rotina RET01, que fará a 
"Simulação" do pressionamento da tecla RETURN sobre o 
número de linha recém colocado na Tela, com □ que esta 
linha será eliminada do programa pelo BASIC, 

Após a eliminação, o BASIC irá passar pela 

ROTINA-PRINCIPAL , que efetuará chamada ao GANCHG em 
*FF0C, onde já se encontra "Ligado" o desvio para a 
rotina DESVIO do BIT-BASIC, a qual devolverá o controle á 
Instrução 5540 desta rotina < CML02 ) , que por sua vez dará 
continuidade ao processo conforme já descrito. 
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SI — ROTINA SINTAXE 
21.1 - OBJETIVO 

A rotina SINTAXE atende a dois objetivos: 

1) "Simplificar a Sintaxe" para vários comandos BASIC, 

facilitando ainda mais a sua utilização pelos usuários MSX . 

2 ) Acionar programas BASIC "de uma linha", previamente 

preparados e armazenados em uma TABELA INTERNA do BIT-BASIC» 
por intermédio de "Sintaxe Simplificada". - .. 

Podemos ter, portanto, vários programas BASIC Utilitários 
já armazenados na memória RAM, prontos para execucáo sem que 
seja necessário carregá-los a partir de ' Disco ou Fita , e 
sem destruir o programa BASIC com o qual vocí* está 
trabalhando - 

Assim, por exemplo, para executar o comando FILES basta 
digitar ".f" e acionar a tecla RETURN, e para mostrar o 

conteúdo da memória em hexadecimal, entre os endereços #BOOO 
e #B010, basta digitar " . hBOOO ,B010" . 


0 USUÁRIO PODE MODIFICAR, A SEU CRITÉRIO, AS 
SIMPL IF ICAÇSO DE SINTAXE PARA COMANDOS BASIC, E PODE 
OU INCLUIR PROGRAMAS BASIC "DE UMA LINHA" NA TABELA 


REGRAS DE 
MODIFICAR 
BIT-BASIC. 


21. E - SINTAXE E FUNÇEJES DOS COMANDOS. 
Veja ÍTEM I 1-53, "TABELA DE SINTAXE". 


21.3 - CARACTERÍSTICAS 

Esta rotina é acionada quando a primeira posição do comando 
BIT-BASIC contém o caráter " . " , seguido de um ou dois 
caracteres que identificam o comando ou programa BASIC a ser 

executado. „ , _ 

0 comando BIT-BASIC é “Transformado em comando BASIC 
correspondente, de acordo com a sintaxe por ele requerida, ou 
em um '‘Programa BASIC" previamente armazenado, o qual é então 
passado ao Interpretador BASIC para execucão. 

Para efetuar a conversão do comando BIT-BASIC para a sintaxe 
do BASIC é utilizada uma TABELA que "Dirige" a rotina SINTAXE 
neste procedimento. 

Esta tabela contém "Caracteres de Controle’ (intermeados a 
valores constantes! que indicam em cada ponto se os "Próximas 
Caracteres" da linha BASIC devem ser obtidos a partir da 
TABELA ou da "Linha de comando BIT-BASIC". 

A passagem ao Interpretador BASIC pode ser efetuada a partir da 
TELA ("Simulando" o presslonamento da tecla RETURN sobre a 
linha via rotina RET01) ou a partir do BUFFER INTERNO, fazendo 
com que o comando/programa gerado N20 APAREÇA NA TELA. 

A opção de APARECER /NSO- APARECER na tela pode ser selecionada 
pelo usuário. 

Veja o ítem 11-23 para maiores detalhes. 
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21.it - ROTINA A5SEMBLER (SINTAXE) 

■*■#*# As Instruções 5690 a 5740 procuram na TABELA o caráter da 
linha de comando 9IT-BASIC seguinte ao 


5 £>90 SINTAXE 

5700 101: 

5710 

5720 

5730 

5740 


CALL ENDE 
LD BC , T21 
CP #FA 
JR NZ, 102 
DEC HL 
LD DE,ERR 


5690 Efetua chamada à rotina ENDE, que pesquisará a TABELA 
procurando o primeiro ou os dois primeiros caracteres da 
linha de comando BIT-BASIC após o 

5700 Carrega em RE6-BC o endereço do campo T21 (Area de 
Trabalho do BIT-BASIC onde será montada a linha a ser 
passada ao BASIC para execução, via TELA ou via BUFFER DO 
BASIC). 

5710 Compara REG-A com #FA (Fim da TABELA encontrado). 

5720 Se a rotina ENDE não colocou #FA em REG-A, o que indica 
que o comando solicitado foi encontrado na TABELA, ^desvia 
para a Instrução 5750 (102), para continuação do 

processo. 

5730 Subtrai 1 de REG-HL ("Retorna" para caráter anterior do 
comando ) . 

5740 Carrega em REG-DE o endereço da linha da TABELA 
encarregada de estabelecer a condição de ERRO DE SINTAXE. 
(Repete na Tela a linha originalmente digitada, 
substituindo o primeiro caráter por 


*### As instruções 5750 a 6010 analisam cada caráter da linha 
da TABELA, um a um, desviando para a Instrução encarregada 
de executar a função correspondente. 

REG-DE contém o endereço da "Entrada" na TABELA. 

REG-BC contém □ endereço da "Area de Trabalho" BIT-BASIC. 
REG-HL contém o endereço do "Comando BIT-BASIC” fornecido 
pelo usuário. 


5750 102 : 

LD 

A, (DE) 

5760 

INC 

DE 

5770 

CP 

#00 

5780 

JP 

Z , 109 

5790 

CP 

#FF 

5800 

JR 

Z, 105 

5810 

CP 

#FE 

5820 

JR 

Z, 107 

5830 

CP 

#FC 

5340 

JR 

Z, IOR 

5850 

CP 

#FE 

5860 

JR 


5870 

LD 

A, (HL) 

5880 

LD 

m 7 ) ? A 

5890 

INC 

HL 

5900 

JR 

105 


86 


II - ROTINA SINTAXE 


5980 

103: 

CP 

#F9 

5930 


JR 

NZ, 104 

5940 


LD 

A, ( T17) 

5950 

104: 

CP 

#FB 

5960 


JR 

Z, I4A 

5970 


LD 

( BC ) , A 

5980 


INC 

BC 

5990 


JR 

108 

6000 

I4A: 

LD 

( T80 > , A 

6010 


JR 

108 


5750 Coloca e* REG-A o próximo caráter da entrada na TABELA. 

5760 Adiciona 1 em REG-DE (passa a apontar para o próximo 
caráter na TABELA). 

5770 Compara REG-A com «00. 

5780 Se REG-A = #00 (fim da entrada na TABELA), desvia para 
a instrução 6820 (109), que fará o retorno ao BASIC. 

5770 Compara REG-A com «FF . 

5800 Se REG-A = #FF, desvia para 6080 (105). 

5B10 Compara REG— A com #FE. 

5880 Se REG-A = #FE, desvia para M20 (107). 

5830 Campara REG-A com #FC. 

5840 Se REG-A = #FC, desvia para 6170 (I0B). 

5850 Compara REG-A com #F8. 

5860 Se REG-A diferente de #FB, desvia para 5980 (103). 

5870 Se REG-A = #FB, carrega o BYTE apontado por REG-HL 
(caráter atual da linha de comando BIT-BASIC) em REG-A. 

5880 '‘Salva" REG-A no campo de trabalho TI 7. 

5970 Soma 1 em REG-HL, passando a apontar para o próximo 
caráter de linha de comando. 

5700 Desvia para 6020 (105), para processar o próximo caráter. 

5780 Compara REG-A com #F9. 

5730 Se REG-A diferente de #F7, desvia para 5950 (104). 

5940 Se REG-A = #F7, recupera em REG-A o caráter salvo em T17 

quando da execugão do última caráter #F8. 

5750 Compara REG-A com #FB. 

5960 Se REG-A igual a #FB, desvia para 6000 <I4A>._ 

5970 Se REG-A diferente de #F7, o que indica que nao é nenhum 

dos caracteres de controle definidos, o caráter obtido a 
partir da linha de comando é colocado na AREA DE TRABALHO , 
na posição apontada por REG-BC. 

5980 Soma 1 em REG-BC, apontando para o próximo caráter da Area 
de Trabalho. 

5990 Desvia para a instrução 5750 (108), para obtenção e 

processamento do próximo caráter da entrada na TABELA. 

6000 Se REG-A contém #FB, este valor ê colocado no Campo de 
Trabalho T20 do BIT-BASIC. 

A presenga deste caráter na TABELA indica que iinha de 
comando a ser processada, no seu “Formato Final' 1 , deve ser 
apresentada na TELA. Se #FB não está presente na TABELA, 
a linha não será apresentada. 
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6020 

6030 

6040 

6050 

16060 

6070 

6080 

6000 

6100 

6020 

6030 

6040 


6050 

6060 

6070 

6080 

6090 

6100 


44*4 


6120 

6130 

6140 

6150 

6160 

6170 

6120 

6130 

6140 

6150 

6160 

6170 


As linhas 6020 a 6100 colocam na "área de Trabalho" os 
próximos caracteres da linha de comando BIT-BASIC 
(apontada por REG-HL), até que seja encontrado um caráter 
.#00 (Fim da Linha) ou um caráter #2C ("," = Fim de 
Parâmetro ) . 

105: LD A, (HL) 

106: CP #00 

JR Zj 102 
INC HL 
CP #2C 
JR Z , 1 02 

LD (BC), A 
INC BC 
JR 105 

Coloca em REG-A o próximo caráter da linha de comando 
BIT-BASIC, apontado por REG-HL. 

Compara RÉG-A com #00, 

Se REG-A = #00 (Fim de Comando), desvia para a Instrução 
5750 (102), para verificar qual o próximo procedimento 
comandado pela entrada na TABELA. 

Soma 1 em REG-HL (aponta próximo caráter Linha de 
Comando) . 

Compara REG-A com #2C. 

Se REG-A = #2C ( " , " = Fim de Parâmetro), desvia para a 
Instrução 5750 (102). 

Coloca caráter da linha de comando na Area de Trabalho. 
Aponta para próximo caráter da Area de Trabalha. 

Desvia para a instrução 6020 (105), para obter e 

processar o próximo caráter da linha de comando, até ser 
encontrado #00 ou #2C . 


As instruções das linhas 6 
pesquisa do "Número da Prime 
BASIC". 

107: LD A, (HL) 

CP #63 
CALL Z , PRI ML IN 
CP #66 
CALL Z.ULTLIN 
JR 105 

Carrega em REG-A o caráter 
BIT-BASIC. 

Compara REG-A com #63 ("c"). 
Se REG-A = "c", procura a 
BASIC e coloca seu número na 
Compara REG-A com #66 ("f"). 
Se REG-A = "f" , procura a úl 
e coloca seu número na Area 
Desvia para a Instrução 6020 


20 a 6170 providenciam a 
ra/Última Linha do Programa 


atual da linha de comando 


primeira linha do programa 
área de Trabalho. 

ima linha do programa BASIC 
e Trabalho. 

< 105) . 
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4 *** As instruções 6190 a 6210 retornam o c °"^ole ao BAS 1*1 
câso o fim da linha deeomando tenha sido alcançado durante 
o processamento de um caráter de controle #FC da TABELA. 


6190 108: 

6200 

6210 


LD A, (HL) 
CP #00 
JP NZ , 102 


6190 Coloca em REG-A o caráter 
6200 Compara REG-A com #00- „ 

6210 Se o "Fim de comando" nao foi 
instrução 5750 (102). 


atual da linha de comando, 
alcançado» desvia para £ 


4 * 4 * As Instruções 6220 a 6380 fazem com que o BASIC execute a 
linha de comando gerada na área de Trabalho» verificando 
se ela deve ou não ser apresentada na Tela. 

Em caso afirmativo» a linha é colocada na Tela e e 
entregue ao Interpretador BASIC para processamento com a 
simulação do acionamento da tecla RETURN (Rotina RET01Í. 
Caso a linha não deva ser apresentada na Tela, ela e 
colocada no BUFFER-BASIC (#F55E) e o controle é retornado 
ao Interpretador BASIC no ponto Após a rotina PINLIN 
(via rotina RET03). 


6220 

109: 

LD 

(BC) ,A 

6230 


LD 

BC, ( T20 > 

62A0 


LD 

(TB0) ,A 

6250 


CP 

C 

6260 


LD 

HL , T21 

6270 


LD 

DE » #F55E 

62B0 


LD 

BC , #00FA 

6290 


LDIR 


6300 


LD 

(DE) ,A 

6310 


JP 

Z,RET03 

6320 


LD 

HL , #F55E 

6330 

110: 

LD 

A, (HL) 

63A0 


INC 

HL 

6350 


CP 

#00 

6360 


JP 

Z , RET01 

6370 


RST 

#18 

6380 


JR 

110 

6220 

Coloca 

#00 (REG-A) na Area 


posiçlo 

da linha de comandi 


desta 1 i nha > . 


6230 

Carrega 

□ Campo T20 em RdG 


há Instrução 2 

-80 para co 1 1 


em REG’ 

C> * 


6240 

Coloca 

#00 em 

TE0 (REG-A), 


de presença do 

caráter #FB 


, após a ultima 
indicar o "Fim" 


de memória 


para "Desligar" este indicador 
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6850 

6260 

6870 

62B0 

6890 

6300 


6310 

6380 

6330 

6340 

6350 

6360 


6370 

6380 


Compara o conteúdo de T80 (REG-C) com #00 (REG A). 

Carrega o endereço de inicio da Area de Trabalho <T81> -m 

Carrega o endereço de inicio do BUFFER BASIC <#F55E) em 

REG-DE. 

Carrega #FA <250) em REG BC. a ____ QAC . r 

Copia 250 BYTES da AREA DE TRABALHO para o BUFFER BASIC. 
Coloca #00 (REG-A) no BUFFER BASIC, após a ui tinta Posicao 
copiada, para indicar Fim do Comando em caso de Linha 

Caso^Campo T80 contenha #00 (resultado do teste efetuado 
na Instrução 6850) , o gue indica que a 

srocessada pelo Interpretador BASIC NZSO DEVE se^ 
apresentada na Tela, desvia para a Rotina RET03 (apfts 
a chamada á rotina PINLIN do BIOS). 

Carrega o valor #F55E em .REG-HL (endereço de ímcio do 

Coloca em REG-A um caráter da linha de comando a ser 

processada, a partir do BUFFER BASIC. 

Aponta para próxima posição do BUFFER BASIC. 

Campara REG-A com #00. 

Se REG-A igual a #00 (fim da linha de comando alcançado), 
desvia para a rotina RET01, que fará a Simulacao do 
pressionamento da tecla RETURN sobre esta linha colocada 
na Tela. 

Coloca caráter contido em REG-A na Tela. 

Desvia para a Instrução 6330 (110) para processar o 

próximo caráter da linha contida no BUFFER BASIC. 


21.5 ROTINA ASSENBLER (LISTLIN) 


*#•*-* As instruções das linhas 6410 a 6430 efetuam 

encaminhamento de comandos para Listar Linhas , 

utilizando a rotina LISTLIN já descrita, porém sem 

efetuar a pesquisa na TABELA. 

LISTLIN é acionada pela rotina INICIO, quando é detectado 
um caráter “Numérico" após o Primeiro caráter na 

linha de comando BIT-BASIC. 

6410 LISTLIN: LD DE, TN 

6420 LD A, #0Ô 

6430 JP 101 

6410 Carrega em REG-DE o endereço de início da entrada na 
TABELA, que contém as constantes e códigos de controle 
necessários parei a Lolocacao na Tela de ucn comanda LIST 
do BASIC (utilizando a própria rotina SINTAXE já 

descrita). _ 

6420 Carrega #00 em REG-A (para que a comparaçao com #FA da 
Instrução 5710 resulte negativa). 

6430 Desvia para a Instrução 5700 (101), pertencente à rotina 
SINTAXE. 
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21.6 - ROTINA ASSEMBLER (ENDE) 

Esta rotina pesquisa a TABELA armazenada a partir do endereço 
#600E, buscando encontrar uma "Entrada" nesta tabela que 
corresponda aos caracteres existentes após o na linha de 

comando BIT-BASIC. 

Esta Entrada conterá as constantes e regras para a conversão 
de sintaxe do comando BIT-BASIC para o comando BASIC 
equivalente. 

CONDI Ç DES DE ENTRADA : 

REG-HL - Endereço do caráter seguinte ao “ . " na linha 
comando. 

CONDIÇÕES DE SAÍDA : 

REG-DE - Endereço da entrada na TABELA correspondente 
dois caracteres após o no comando BIT-BASIC. 

REG-A - Igual a #FA indica "Comando nio Encontrado". 

Diferente de #FA indica "Comando Encontrado . 


de 


aos 


444 * As Instruções 6450 a 6510 preparam o início da pesquisa 


6450 ENDE: 

6 A 60 

6470 

6480 

6 A 90 

6500 

6510 


LD B,A 
INC HL 
LD A, (HL) 

LD C >A 
LD DE, TABELA 
LD A, (DE) 

INC DE 


6450 Coloca primeiro caráter após o em REG-B. 

6460 Aponta para próxima posição linha de' comando. 

6470 Coloca segundo caráter após o em’ REG-A. 

6480 Coloca REG-A em REG-C. . , T . oc , a 

6490 Coloca em REG-DE o endereço da primeira posição da TAtítLH. 
6500 Coloca em RE5-A o primeiro caráter da primeira posição da 
TABELA. „ TKQ[T1 

6510 Aponta para a segunda posição da TABELA. 


4 **# As instruções 6520 a 6600 procuram na 
caráter desejado (contido em REG-B). 


tabela o primeiro 


6520 

120: 

CP 

B 

6530 


JR 

Z, 122 

6540 

121: 

CP 

#FA 

6550 


RET 

1 

6560 


CP 

#00 

6570 


LD 

A, (DE) 

6580 


INC 

DE 

6590 


JR 

Z, 120 

6600 


JR 

121 
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65£Q Compara REG-A com REG-B (caráter da Tabela com caráter 

Linha de Comando). ^ 

6530 Se REG-A - REG-B, desvia para a Instrução óólü iidd) 
entrada atual na Tabela contém □ caráter pesquisado). 


da 
( a 


■§■»*■* As instruções das linhas 6540 a 6600 Pulam a entrada 
atual da Tabela, até o início da próxima entrada (já que 
o caráter procurado não foi encontrado na entrada atual). 


6540 Compara RE6-A com #FA, 

6550 Se REG-A = #FA (Fim da Tabela foi atingido), Retorna ao 
ponto de chamada de ENDE. 

(0 valor #FA em REG-A indica que nenhuma Entrada da TABELA 
possui os dois primeiros caracteres iguais aos dois 
caracteres após □ no comando BíT-BASIC:) 

6560 Compara REG-A com #00. 

6570 Carrega em REG-A o próximo caráter da Tabela. 

65B0 Soma 1 ao REG-DE (próximo caráter da Tabela). 

6590 Se REG-A = #00 (teste efetuado na linha 6560), o que 
indica que o 41 F i m de Uma Entrada na Tabela foi atingido, 
desvia para 6520 (120) para comparar próxima entrada. 

6600 Desvia para 6540 (121) para pular os próximos caracteres 
da Entrada atual, até encontrar #00 ou #FA. 


As Instruções 6610 a 66B0 verificam se a Identificação 
do Comando BÍT-BA5IC após o “ . 11 deve conter um ou dois 
caracteres. 

Caso deva conter apenas um, retorna ao ponto de chamada de 
ENDE, pois a primeira posição após o ’V toincide com a 
primeira posição da Entrada Atual da TABELA. 

Caso deva conter dois caracteres, é verificada a 
coincidência ou não do segundo caráter após o - com o 
segundo caráter da Entrada na TABELA. 


6610 

122: 

LD 

A, (DE) 

6620 


CP 

#20 

6630 


INC 

DE 

6640 


RET 

Z 

6650 


CP 

C 

6660 


JR 

NZ, 121 

6670 


INC 

HL 

6680 


RET 


6610 

Coloca 

em REG" 

-A a se 


da posição da Entrada Atual da 
TÃBÉLA (apontada por REG-DE). 

6620 Compara REG-DE com #20 

6630 Aponta para próxima posição da TABELA . 

6640 Caso a segunda posição da Entrada Atual da Tabela seja 
“Branco 11 (#20), retorna ao Ponto de thamadà de ENDE, pois 
o primeiro caráter è já coincidente e é necessário apenas 
um caráter para identificar o comando (#20 indica isto). 

6650 Compara a segunda posição após o 11 . " com a segunda 
posição da Entrada na TABELA* 
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□660 Caso as segundas posições não coincidam, desvia para a 
Instrução 6540 (121) para continuacao da pesquisa nas 

próximas Entradas da TABELA. 

6670 Aponta para o próximo caráter da linha de comando. 

6680 Retorna ao ponto de chamada de ENDE com os dois caracteres 
coincidentes. 


21.7 - ROTINA ASSEMBLER (PRIHLIN/ULTLIN) 


Estas rotinas procuram a primeira/última linhas do programa 
3ASIC corrente e colocam na Area de Trabalho os números 
correspondentes. ' „ „ „ 

Elas são utilizadas na substituição das constantes c e f 
nos comandos BIT-BASIC pelos números da pr imeira/úl ti ma linhas. 


**** As instruções 6710 a 6750 '‘Salvam" os Registradores e 

obtém o número da primeira linha do programa BASIC. 

1 

6710 PR IML IN: PUSH HL 

6720 PUSH DE 

6730 PUSH BC 

6740 LD DE, (#F676) 

6750 CALL PXLIN 


6710 "Salva" REG-HL na PILHA. 

6720 "Salva" REG-DE na PILHA. 

6730 "Salva" REG-BC na PILHA. 

6740 Carrega em REG-DE o camò TXTTAB (Endereço de Inicio do 

programa BASIC) . 

6750 Dbtém "Próxima Linha" BASIC (Primeira). 


As instruções das linhas 6770 a 6860 colocam o número da 
linha na Área de Trabalho, e restauram os Registradores. 
Para isto, é utilizada a rotina do BIOS a partir do 
endereço #36DB, que faz a conversão do número armazenado 
em dois BYTES (Formato Binário) para o formato ASCII (um 
BYTE para cada dígito). 


6770 130: 

67 BO 

6790 

6800 

6810 

6820 

6830 

6840 

6850 

6B60 


LD ( #F7FB) ,HL 

POP HL 

LD BC, #0000 

CALL #36DB 

LD B,H 

LD C,L 

POP DE 

POP HL 

INC HL 

RET 


6770 Coloca o Número da Linha (armazenado em REG-HL pela 
rotina PXLIN) hds endereços #F7F8/#F7F9. 

6780 Coloca em REG-HL o endereço da Area de Trabalho do 
BIT-BASIC (armazenado na PILHA pela Instrução 6730). 

6790 Coloca o valor #0000 em REG-BC. 
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6B00 Efetua chamada á rotina do BIOS no endereço 836DB, cuja 
função é "Converter para ASCII o valor Binário armazenado 
a partir do endereço #F7F0 (que contém o Número da Linha), 
colocando cada digito convertido no endereço apontado por 
REG-HL (que aponta para a área de Trabalho)*'. 

6810 Coloca REG-H em REG-9. 

6880 Coloca REG-L em REG-C. 

As Instruções 6810/6880 colocam REG-HL em REG-BC, que 
volta a conter o Endereço da área de Trabalho, porém 
apontando para a posição imediatamente seguinte ao Número 
da Linha no formato ASCII. 

6830 Recupera REG-DE da PILHA. 

6640 Recupara REG-HL da PILHA. 

6850 Soma 1 em REG-HL (aponta para caráter seguinte da Linha 
de Comando BIT— BASIC) . 

6860 RETORNA ao ponto de chamada de PRIMLIN/ULTLIN. 


**** As instruções 6890 a 6980 "Salvam" os Registradores e 
obtém o número da última linha do programa BASIC. 


6890 ULTLIN: 

6900 

6910 

6980 

6930 140: 

6940 

6950 

6960 

6970 

6980 


PUSH HL 
PUSH DE 
PUSH BC 

LD DE , ( #F676 ) 
LD ( T 1 6 ) , HL 
CALL PXLIN 
JR NC , 140 

JR NZ , 140 
LD HL.ÍT16) 

JR 130 


6890 "Salva" REG-HL na PILHA. 

6900 "Salva" REG-DE na PILHA. 

6910 "Salva" REG-BC na PILHA. 

6980 Carrega em REG-DE o campo TXTTAB (Endereço de Início do 

programa BASIC). 

6930 "Salva" REG-HL < "Endereço da Linha BASIC Atual") em TI 6. 

6940 Obtém "Próxima Linha" do programa BASIC. 

6950 Se "Fim do Programa" não foi alcancado, desvia para 6930 
(140) para obter a próxima linha (esta condi cão é 

representada por C,Z). 

6960 Se "Fim do Programa" não foi alcançado, desvia para 6930 
(140) para obter a próxima linha (Idem). 

6970 Carrega em REG-HL o campo T16 ("Número da Última Linha 
BASIC"), aí colocado pela instrução 6930. j 

6980 Desvia para a instrução 6770 (130) para cclocacao do 
número da linha na área de Trabalho e retorno ao ponto de 
chamada de (LTLIN. 
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AREAS DE TRABALHU 


0 BIT-BASIC coloca os Campos de Trabalho T01 a TE! a partir do 
endereço #7B0Q. 

Estes campos slo utilizados em diversos pontos do programa e 
os seus conteúdos são os seguintes : 

- Número da primeira linha do programa BASIC 

listada na Tela. 

- Tabela com 80 BYTES, onde são guardadas os 
números das linhas correspondentes aos 
“índices" de "0 H a 11 9“ ídois BYTES para cada 
índice) . 

- Número da linha utilizado para comparação 
pela rotina PXL1N . 

0 BIT-BASIC mantém neste campo a u Linba 
Seguinte à Última Linha Apresentada na Tela 1 '. 

- Quantidade de linhas a retroceder, 

- Constante "CLEAR" 7 utilizada na rotina 
NOVDBAS- 

- "Salva" o campo TXTTAB (endereço de inicio do 
programa BASIC na memória)* 

- Indica à rotina que "Lista Página" se está 
sendo executado um comando de "Pesquisa de 
Constante" - 

- Caráter " = " * utilizado pela rotina de 
"Pesquisa de Constante". 

- Constante a ser pesquisada na rotina VERCHR, 


#7B00 

101 

(08) 

VB02 

TOE 

(80) 

#7B1Ó 

T03 

(oe> 

*7818 

T04 

(08) 

#7B1 A 

T05 

(06) 

#7830 

T06 

(08) 

#7B22 

T07 

(0!) 

#7B23 

108 

(01 ) 

#7838 

T09 

(81 > 

#7B39 

TIO 

(08) 

#7B3B 

TU 

(08) 

#7B3D 

T18 

Í08 ) 

#7B3F 

113 

(08) 

*7B4Í 

TIA 

(01) 

*7B<t2 

T15 

(01) 

#7B43 

116 

(08) 

#7B<i5 

T17 

(01 ) 

#7846 

ué 

(01) 

#7B47 

T19 

(06) 

#7B4D 

T80 

(1) 

#7F00 

T81 

(855) 


da 


Linha-DE 


í Cópia/hovimentação 


( Cópia/Mov imentaçao ) - 
(Cópia/ Movimentação ) . 
(Cópia/Movimentacao) . 


- Numero 
Linhas) . 

- Número da Linha-ATÉ + 1 

- Número da Linha- APÓS 

- Número da Linha-L IMITE 

- Indica "Pr imeira ou Segunda Passagem" pela 
rotina CML08 (Liga/Desliga), em comandos M .m" 

- "Tipo de comando" (V 1 ou M m") 

- Endereço de inicio da "Linha BASIC Atual". 

- Salva caráter para utilização posterior. 

- Indica á rot ina í fIPTELA se , é para ser 
verificada a condição de "última Linha 
Inferior da Tela". 

- Indica á rotina INICIO se está sendo executado 
comando de "Cópia ou Movimentação de Linhas". 

“ Indica se Linha de comando deve ou nao ser 
apresentada na Tela. 

- Area de Trabalho do BIT-BASIC para conversão 
de Sintaxe dos comandos 
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23 — TABELA DE SINTAXE 

23.1 - OBJETIVO. 

0 objétivo desta Tabela é dirigir a rotina SINTAXE na tarefe de 
"Converter a Comando BÍT-BASIC Digitado pelo Usuário" para a 
"Sintaxe Requerida pelo BASIC". >■ **< 

Por exemplo, se o usuário digitar o comando BIT-BA5IC ( .f e 
teclar RETURN, este será convertido no comando "files" antes 
de ser entregue ao BASIC para execução. 

^ Linha de Comando a ser executada pelo BASIC pode ou náo ser 
apresentada na Tela, conforme opçaa do usuário. 

Cada "Entrada" (Linhal da Tabela corresponde a um "Comando" 
diferente, identificado pelas duas primeiras posições. 

Cada Entrada da Tabela é encerrada pelo caráter #00. 

0 “Fim da Tabela" ê identificado pelo caráter #FA. 

Uma Entrada pode efetuar a Conversão de Sintaxe para um 
"Comando BASIC" determinado . ou para um "Programa BASIC" 
previamente armazenado. M „ 

Podemos ter, portanto, vários programas BASIC Utilitários 
prontos para execução, sem necessidade de carregá-los de disco 
ou fita. 


0 BIT-BASIC JA POSSUI UMA TABELA PRÓPRIA , PORÉM A TABELA DE 
SINTAXE É MODIFICÁVEL PELO USUÁRIO, QUE PODE ALTERAR OU INCLUIR 


NOVAS ENTRADAS, A SEU CRITÉRIO. 

ACOMPANHA 0 BIT-BASIC UM PROGRAMA BASIC (BITBAS.TAB) QUE 
PARA MODIFICAR A TABELA DE SINTAXE. 


SERVE 


23.2 - SINTAXE DOS COMANDOS BIT-BASIC. 

0 comando BIT-BASIC é identificado por um caráter na 

primeira posição da linha digitada pelo usuário, seguida por um 
ou dois caracteres gue identificam o tipo do comando (conforme 
determinado pela TABELA ) , seguidos por sua vez de um ou mais 
par3metros separados por vírgula. 

. - Comando Simplificação de Sintaxe, 

x ou xx = Código do Comando BIT. BASIC. u n 

....... = Um ou mais parâmetros, separados por , 

A conversão de sintaxe para "Comandos BASIC será mostrada por 
intermédio de exemplos, apresentando o "Comando BIT-BASIC e a 
"Linha BASIC" gerada correspondente. 

Para os "Programas Simp 1 if içados" será mostrado o Comando 
BIT-BASIC” e a "Função" correspondente. A listagem dos 
programas gerados pode ser vista no item 23.5 (Listagem oc 
Programa BITBAS.TAB), ou executando os comandos de forma 
"Explícita" (atualizando a Tabela com I$I nas linhas do 
BITBAS.TAB) . 
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^3,3 - COMANDOS BIT-BASIC X COMANDOS BASIC . 


. f a 

. fb jpgml 
. fb jpg*** 


files 
f iles^a: 1 ' 
f i les w b:pgml M 
f iles"b:pg*.*" 


. la ,pgmi 
< 1 b ,pgmE 
. lc ,pgm3 


load^aípgml " 
iDad^bípgmP" 
lDad H cas:pgm3** 


,sa,pgml - save^a:pgml" 
.sbípgmlia = save ,s a spgml" 

. sc*pgm3 - save"cás : pgm3" 


. kb ? pgml = ki 11 "b : pgml" 


. na * pgml ? pgn 


natne" a : pgmi "as "a spgn" 


, ga»pgro8 = merge"aspgmS M 

.bla,pgm3 * bload"a:pgm3 tl 

, b ib , pgm3 * r = bload"b ípgmS" * r 

.b la í pgm4, r ,COOO = b load"a:pgm4 " > r ,&hCOOO 

,blc,pgm5 - bload’*cas:pgm5" 


, bsa í pgm5,c00Q 5 1 300 

= bsave ll a:pgm5* > ? àhcOQO * &hc:3Q0 

, bsb Tpgmóf aab3 ? b5df 3 bAOO 

= bsave J, a:pgm6 M , &haab3 ? &hb5df » &bb400 
, bsc j pgm7 , aaaa f bbbbicccc 

= bsave"cas:pgm7" ,&haaaa,&5hbbbb i&hcccc 


V 

v50 

v50 j 30 
v50 , 30 « 5 

- renufn 
= renumSO 
= renum50?30 
= rerum50*30<5 

ucdOO 

= defusr^&hcdOO 

xlA,0,0 

= color IA? 0*0 

d30 >70 
d30-70 
dc, 100 

* delete30-70 

- dpi et e30~70 

- deletel0“100 

dBOO, f 

= deleteE00-300 

dc * f 

- deletel0-300 

wEO 

widthEO 

30 

30*50 = 

30-50 = 

1 i st 30 
1 ist30-50 
1 i st 30-50 


a=us r ( 0 ) 


(Substitui au toma t icamente rt c" 
primeira linha do programa) 
(Sub st i tui au toma t ícamente "f" 
última linha do programa) 


pela 

pela 
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23.4 - COMANDOS BIT-BASIC X PROGRAMAS SIMPLIFICADOS (FUNÇOESí. 

São°mostrddo 5 na Tela todos os BYTES entre ttbOOO e #b020, na 
representação "Hexadecimal “ . já preparando um comando ".p" para 
o caso de se desejar modificar o conteúdo destes BYTES. 

. pbOOO ,cd cO 00 c9 „ , „ 

Òs BYTES que aparecem '‘Após a Vírgula ( representação 
Hexadecimal* dois caracteres para cada BYTE, separados por um 
caráter "Branco" ou outro qualquer), são colocados na memória 
(P0KE ? S) a partir do endereço #BOOO. 

.hx 

Aguarda □ pressionamento de qualquer tecla que corresponda a um 
caráter ASCII i inclusive teclas "Especiais* 1 tais como "ESIT , 
*TAB" e outras), e mostra na Tela o caráter na representado 
ASCII* Hexadecimal e Binária. 

. fea i prog 1 

Mostra os endereços de Início, Fim e Execução para □ programa 
PR0G1 (programa executável, em linguagem de máquina, salvo por 
"Bsave") . 

. opa , pgtex , 13 

Executa o Gpen” do arquivo pgtex e efetua a leitura dos 
13 X 100 * 1300 primeiros BYTES. 


Lista na Tela, no formata ASCII, o conteúdo do arquivo "Aberto" 
pelo comando f ‘,opa'\ a partir do BYTE posicionado naquele 
comando (no caso do exemplo, lista o arquivo pgtex a partir do 
caráter 1301 

A cada "tela cheia" aguarda □ Press lonamento de qualquer tecla 
para continua^ o processo (inclusive antes da primeira tela). 

. f x 

Lista na Tela, nos formatos ASCII e Hexadecimal, o conteúdo do 
arquivo "Aberto" pelo comanda ".opa", a partir do caráter 
posicionado (semelhante comando * f d ” > . 

.ql 

Executa o comando "close#!" para "fechar* o arquivo aberto por 
um comando " . opa" . 

Aciona o comando 41 -wwf", que è transformado no comando 
BIT-BASIC "<<xxx'\ onde "xxx" á o número da última linha do 
programa BASIC existente na memória (lista o programa a partir 
de sua última linha). 

. ok 

Faz com que nao seja mais apresentada a mensagem " 0k" após a 
execução de uma linha de comando BASIC no modo "Direto". 
Repetindo o comando a mensagem volta a ser apresentada. 
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23,5 - CARACTERES DE CONTROLE . 

A rotina SINTAXE monta o comando em uma "Area de Trabalho" 
ante^ de passá-lo ao BASIC para execução. 

A TABELA DE SINTAXE contém "Caracteres de Controle" intermeados 
a^va lares constantes, que dirigem a rotina nesta tarefa. 

São os seguintes os “Caracteres de Controle" e os seus 
dignificados correspondentes: 

#FF - Neste ponto deve ser obtido o próximo parâmetro do 
Comando BIT-BASIC e colocado na Area de Trabalho (os 
parâmetros sao separados por vírgula = #20, 

#FC ~ Se não há mais nenhum parâmetro fornecida, encerra a 
conversão, passando o comando ao BASIC na situação 
em que se encontra. Caso contrário, continua o 
processo de conversão. 

(Para o caso de "Parâmetros Opcionais”, ) 

#FB - Coloca um caráter obtido da linha de comando 
BIT-BASIC na Area de Trabalho, e "Salva” este 
caráter para utilização posterior. 

#F9 - Coloca na Tela o caráter previamente "Salvo" quando 
o último caráter de controle #F8 foi processado. 

#FE - Funciona de forma semelhante ao caráter #FF, porém 
antes ê feita verificação se o parâmetro obtida é 
■c" (#63) ou "f" (#66), subst i tu í ndo-05 peio “Número 
da Primeira Linha BASIC" ou pelo “Numero da Última 
Linha BASIC" respectivamente. 

#FB - Indica que a linha de comando deve ser apresentada 
na Tela, antes de ser executada pelo BASIC. 

#00 - Indica o fim de uma entrada na TABELA, ponto na qual 
a linha de comando BASIC já está completa. 

#FA - Indica o “Fim da TABELA", quando o comando BIT-BASIC 
não é nela encontrado. 


Se o caráter obtido da TABELA não é nenhum das anteriores, o 
procedimento da rotina SINTAXE é caiocá-lo na Tela e passar 
para o caráter seguinte. 
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S3. 6 - Í10DIFICAÇ50 DA TABELA DE SINTAXE. 

0 programa BIT0A5.TAB que acompanha o BIT-BASIC serve para 
modificar a TABELA DE SINTAXE. 

As primeiras linhas deste programa sao linhas de "Comentário* 1 
{ precedidas do caráter " 3 ") e cada uma delas corresponde a uma 
.Entrada na Tabela. 

As duas primeiras posiçoes de cada linha* ap6s o 
correspondem á "Identificação do Comando" (a serem utilí 2 adas 
após o no comando^BIT-BASIC ) . 

Se a segunda posição for "Branco 11 » somente um caráter é 
necessário para identificar o comando* 

Os caracteres de controle devem "ser colocados entre os símbolos 
"[]" e serão convertidos para os caracteres já descritos no 
item 83. 3 t sendo colocados em uma Jl Ar ea de Trabalho". 

Os caracteres de controle válidos sao os seguintes. 

[ + ) * Obtém próximo parâmetro do comando BIT-BASÍC e coloca na 
área de Trabalho. 

t-j - Passa o comando ao Interpretador BASIC caso não haja mais 
parâmetros fornecidos. 

{<] - Obtém um caráter da linha de comando BIT-BASIC* coloca-o 
na área de Trabalho e o "Salva 11 para uso posterior. 

[>] - Obtém ultimo caráter salvo em t<3 e q coloca na Area de 
Trabalha . 

[ = ] ^ Se próximo parâmetro é um caráter l, c" ou N f M i o substitui 
pelo número da pr imeira/ól t ima linha do programa BASIC 
presente na memória. 

{ $] - A linha de comando deve ser apresentada na Tela antes de 
ser processada pelo BASIC. 

Ao ser executado o programa BITBAS.TABi este efetua o 
carregamento do 8IT-BASIC e "modifica" a TABELA DE SINTAXE de 
acordo com os critérios acima descritos. 

0 BIT-BASIC é então novamente "salvo" sob outro nome, com a 
TABELA já modif ieada^nara evitar que a versão originai possa 
ser danificada em razão de um erro acidental. 
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23.7 - LISTAGEM DO PROGRAMA BITBAS.TAB 


0 1 I load"[ + ]i£ + i" 

20 ’ r run"[+]; E + 3" 

30 ’sO screenO 
40 *sl screenl 
SO *sy _syste(n 
60 " s save" t+3 : E + 3“ 

70 ’ ka keyon 

90 ’kf keyoff 

<?0 ’ k ki 1 1 " [+3 : t+] 

100 *bl b load “ [+]:C+D“E-3,£+3 

HO ’bs bsave"C + 3:t + r,8.ht+3,8,h[ + ]l>3,S.ht + 3 

120 ’ v renu»[ + ][ _ 3 »£+3t-l > E + 3 

130 ’d deleteC=3C-3-t=l 

140 ’x color E+lt-3 i C+3C-3 j C+3 

150 ’u defusr=ih[+3:a=usr Í0> 

160 ’ n name" t >1E< 3 :C + ]"as"C<] : C + 3" 

*70 ’p xS=-&hr + ]:aí="[ + 3":z'/.= ( ( lenia* )-l ) /3 ) ;for iX=OtozX:a%= 
vai ( ''&h”+mid$í at,3*i7,+ l , 1 1+midí ( a$,3*iV.+E , 1 ) ) rpokeí xX+iX ) ,a% 
: next i X : pr int " .h" jhexí ( xü ) í " j " í hex$ ( x*/*+zX ) í íend 
ISO ’hx a$=inpiitíí 1 ) :a*/.=asc(a$) íprint"c = ";a$j' h= ;hex$( a7.) i 
ü d=";aXí" b = " ;r igh t$ í "00000000" +bin$( a*/.) ,8) 

190 ’h a*4=&b[ + 3 :pr int " . p“ ;hex$ ( a*/.) í " > " ; :foriX=aV.toS.ht+] :aK= 
peekí i V. > iprinthextí int(aü/16) > ihexí (a7.madl6) i" " } inextiV. 

200 'fe apen‘‘[ + ];C + ]"farinputas#l:r$=input$(7i 1 > :close#l :pr j 

nthex$ ( £ 56 *asc í mid$ í r $ j 3 j 1 1 ) + asc (ra id$ ( r$ j 2 t 1 ) ) ) j t ;:printhe 

k$ ( 25á*asc CiTtidfcíri »5» 1 ) )+asc (rnidí (r$,4 , 1 ) ) :pr inthexítS 

56*asc(mid$(r$,7,l ) ) + asc (rcidí (r$,6, 1 ) ) ) 

210 ’op open"E + 3:[ + ]"forinputas#lC-3:k*/.=C + í :forlK=ltokX:a*=i 
nputí ( 100, #1 ) rnextiX 

220 ’fd forx%=0to9999:b$=input$l 1 ) iclsíprint for y/,=0t 

o9999; t=ascía$):aí=inpatí (1 »#1 ) : kX=k‘/.+ l : pr intchrí ( t > ; ip%=csr 
1 in: ifo%>21thennextxíí:elsenextyX 

230 *fx forx=Oto9999:b$=input$< 1 ) ;cls:forr=lto20:pr mt:print 
k*/.5 :KX=K7.+8: locateòifor j=0to7: t=asc(a$> :printhex$ t int(t/16) ) 
íhex$í tmodlà) ; " “ ; :a$=input$( 1 ,#1 1 :p=pos(0) : locatep/3+27: if t 
<32thenprint" . " { : locatep : next j »r . xíelsepr intchríí t ) i ilocatep 
:next j,r , x 

240 *f f i lest-]"t+l ! £ + 3“ 

250 ’q close#[+3 
260 C*].Mwf 

270 ’ww E$]<<C=1 
2S0 ’ w widthOl 

290 J ok a*/.=peek(ihff07í :poke&hf f0a.&h41 ; poke&hf f09 , &h34 : poke 
Jihff O0jihc3: if a’/.=&>hc9thenpokeJ<hf f07jihc 1 :elsepoke&hf f07,&hc9 
300 ’[] fim da tabela 
310 ’ 
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320 FOR I */.= &HC 100TG&HC 1 97 : READAí : XX=VAL < í*H +AÍ ) :POKEI X,X/. :NE 
XTI% 

330 BLOAD" A: BITBAS. ASS" 

340 DEFUSR=SiHC100:A=USR(0) „„„„ 

350 BSAVE" A : BITBAS1 . ASS" .&HA5Q0, ÍHCOFF , &HC020 

360 DEFU5R=£.HC020 : A=USRÍG) :END 

370 DATA21 ,00,a5,ll ,f f , b4, DD ,2A ,76,F6 

3B0 DATADD,7E,07,FE,5B,CA,94,C1 ,CD,8E 

390 DATAC1 ,DD,7£,08,CD,BE,C1 ,DD,E5,DD 

400 DATA7e,0A, FE,00 , 28,0B 

410 DATAFE,5B,2B, 16, CD, BE. Cl , DD, 23, 18 

420 DATAEE ,CD, BE,C1 , DD,E1 ,DD, 22 , 3A,C1 

430 DAT ADD,2A, 00,00 , 1B , CC , DD , 23 , DD,7E 

440 DATAOA,FE, 2B,20, OB, 3E,FF,CD» BE,C1 

450 DATADD,H3, DD, 23, 18, CB, FE, 20,20,04 

460 DATA3E,FC, 1B,EF,FE,3E,20,04,3E,F8 

470 DATA18,E7,FE,3C,20,04,3E,F9,18,DF 

480 DATAFE , 3D, 20,04 , 3E,FE , 18, D7,FE,24 

490 DATABO, 04,3E,FB , 18, CF ,FE, 26 ,20,0C 

500 DATADD,E1 , DD, 22, 86, Cl , DD, 2A, 00,00 

510 DATA1B,93,DD,23, 18, BF , 77,23, E7,D8 

520 DATAC1 ,C1 ,3E,FA,77,C9 
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III - 0 PROCESSADOR Z-00 


oi — O PROCESSADOR Z-QO 

0 Z-80 É 0 PROCESSADOR PRINCIPAL DOS MICROCOMPUTADORES M5)C. 

Para explicar □ seu funcionamento vamos compará-lo ao BASIC» 
com o qual voc? já está familiarizado* ^ 

Quando vo cl escreve um H Programa BASIC" , e comandada a sua 
execução ( RUN ) * o "Interpretador BASIC* 1 (instalado na ROM) 
percorre linha a linha as “Instruções 14 deste programa por voe! 
criadas, efetuando uma a uma as operações solicitadas (INPUT, 
PRINT i etc) . 

Neste sentido o Z-80 funciona de forma semelhante ao 

Interpretador BASIC» pois também percorre uma sequlncia de 
* Instruções" criadas pelo usuário» executando uma a uma as 
operações determinadas • 


CARACTERÍSTICAS Z-80 X 14 INTERPRETADOR BASIC 41 

Embora semelhantes no modo de operação» algumas diferenças e 
caracter ist icas importantes dos dois "Programas" devem ser 
evidenc iadas : 


* 0 BASIC fica instalado em memória ROM, enquanto que o Z-80 é 
constituído por uma "Microplaqueta" ("CHIP") que armazena um 
circuito eletrónico muito maís^complexo (do nosso ponto de 
vista, porém, esta diferença não será considerada ) - 


- A "Linguagem" que o Interpretador BASIC entende é "BASIC” f 
enquanto que a "Linguagem" que o Z-BO entende é a Linguagem 
de Máquina do Z-80 11 (abordaremos esta linguagem, o ASSEMBLER 
Z-80, mais de perto). 

Escrever um Programa BASIC (Linguagem BASIC) para ser 

executado pelo Interpretador BASIC é equivalente a excrever 
um programa Z-00 (Linguagem ASSEMBLER Z-00) para ser 

executado pelo processador Z-80)* 


- No BASIC voc? pode definir vários "Campos" ou "Areas de 
Trabalho" (por exemplo "A*" , "1% H BXU)* etc.), e existem 
outras “Areas de Trabalho" do próprio BASIC que podem ser 
acessadas (por exemplo “KEYl" , "KEY2" » 4 ‘5PRITE$ (0) 11 » eto*>. 
No Z-80 também existem áreas "Pré-Definidas", constituídas 
pelos “Reg istradores" , "Pilha do Sistema" e outras, cujo 
funcionamento será posteriormente abordado que podem ser 
também definidos "Campos de Trabalho' 4 do Usuário (uma 

car ac ter ist ica das Instruções do Z-80 é que suas áreas 
pré-definidas são "Übr í gator i amente" ref erenciadas na maioria 
delas) - 


- A linguagem BASIC é de "Alto Nível" (flexível e próxima da 
linguagem "Humana"), enquanto que a linguagem Z-BO é de 
"Baixo Nível" (mais "distante" da linguagem "Humana", apenas 
operações elementares estritamente vinculadas ao Z-0Q). 
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- 0 programa BASIC segue a ordem dos "Números" das Linhas" e, 
dentro destas, sequencialmente, as instruções ali contidas £a 
não ser que um "Desvio" seja provocado por uma Instrução 
G0T0/G0SUB). 

0 2=80 segue a “Sequência Física das Instruções, armazenadas 
umas imediatamente após as outras (a não ser que um "Desvio" 
seja provocado). 

- D próprio "Interpretador BASIC" é "Escrito" na "Linguagem de 
Máquina do Z-80". 

Portanto, o Z-BO "Executa" o "Interpretador BASIC que, por 
sua vez, "Controla a Execucão" do "Programa BASIC" escrito 
por você (utilizando o próprio Z-80 para isto). 

- Além da tarefa de “Controlar a Execução do Programas BASIC 
do Usuário", o "Interpretador BASIC^ 1 executa todo o trabalho 
de "Comunicação com o Usuário MSX", ou seja, é ele que 
analisa qualquer comando por você escrito, acionando todas 
as rotinas apropriadas para o seu tratamento. 


(ÍREAS DE TRABALHO E LINGUAGEM DO Z-BO 

Passaremos a seguir a descrever as "Areas de Trabalho" do 2-80 
e a sua "Linguagem". 

Pretendemos ser extremamente objetivos e _ prât icos nas 
xplicacões, com as quais você poderá "Iniciar" uma comunicação 
Direta" com o Z-80, até então somente efetuada com a 
"Intermediação" do Interpretador BASIC. 
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OS — 4REAS OS TRABALHO OO 2-80 


São as seguintes as principais "Areas de Trabalho" do "Programa 
2-80" que interessam para os nossos objetivos. 


RQ3ISTRAD0RES 8, C, D, E, H e L 

06 "Areas de Trabalho" de 01 BYTE cada uma. 

Estas áreas sao denominadas REGISTRADORES) e podem também ser 
utilizadas "aos Pares" (BC, DE, HL). 


REGISTRADORES IX, IY 

02 "Áreas de Trabalho" de 02 BYTES cada uma. 

Estas áreas sao utilizadas como "índice" por algumas Instruções 
do 2-80. 


REGISTRADOR A 

Uma área de trabalho "Especial", de um BYTE. 


REGISTRADOR F 

Uma área de trabalho "Especial", de um BYTE. 


PILHA DD SISTEMA 

Area de trabalha de tamanho variável, destinada a Salvar o 
conteúdo das outras áreas de trabalho. 


REGISTRADORES SP e PC 

Duas áreas de trabalho "Especiais", de d°i s BYTES cada uma. 


0 QUE FAZ 0 PROCESSADOR Z-BO 

0 que a maioria das "I nstruções " do Z-BO fazem é Movimentar 
dados entre as suas Areas de Trabalho, e entre elas e as 
memórias ROM/RAM. 

Portanto, "Escrever um Programa Z-BO" significa, basicamente, 
escrever uma série de instruções para colocar dados, retirar 
dados, modificar dados ou testar os dados contidos nestes 
locais . 


MUITO SIMPLES, NSO É ? 
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DESCRI Ç20 DA5 ARÉA5 DE TRABALHO DO Z-80 
08,1 - REGISTRADOR A 

O Registrador “A" ( Accumulator = Acumulador) é "Especial 11 
porque um grande número de Instruções do 2-80 trabalham 
exclusi vamente com esta área de trabalho. 

OS. 8 - REGISTRADOR F 

0 Registrador "F" é "Especial" porque é utilizado pelo 2-80 
para Registrar/ Indicar 11 □ QUE ACONTECEU 11 ao ser executada uma 
Instrução determinada* 

Cada BIT do Registrador F guarda uma informação diferente e, 
assim» uma determinada Instrução 2-80 pode "Posicionar 1 * í Ligar 
ou Desligar) cada um dos 0TT0 8ITS deste Registrador (também 
chamados de "Indicadores de Estado"). 

Por exemplo» se o 2-80 executa uma instrução de "Subtração" 
de um certo valor do Registrador A> o BIT-6 do Registrador F 
ficará "Ligado/Desligado" para indicar se o resultado da 
operação é "Igual" ou "Diferente" de Zero. 

Estes 11 Indicadores" também podem ser "L igados/Desl i gados" por 
instruções do Z-80 próprias para esta finalidade» ou podem ter 
seu posicionamento "Forcado" pelo programa do usuário» com o 
objetivo de registrar "o que aconteceu" durante a execução de 
uma determinada rotina» de acordo com critério estabelecido 
pelo próprio usuário. 

São os seguintes os significados dos BITS do Registrador F» que 
refletem as condições de execução de outras instruções ; 


S 2 AC P/D N CY 

BIT-7 BIT-6 BIT-5 BIT-4 BIT-3 BIT-S BIT-1 BIT-0 


BITS DO REGISTRADOR F (INDICADORES DE ESTADO) 


BIT-0 

(CY) 

BIT-1 

(N) 

BIT-2 

tP/0) 

BIT-4 

< AC) 

BIT-6 

<Z> 

BIT-7 

< S > 


Indicador de Transporte ■ £CY = CarrY-sfcatus) 
Indicador de Adição/Subtração 
Indicador de Paridade/Estouro 
(P/0 = Parity/Qverf lo») 

Indicador de Transporte Intermediário 
(AC * Auxiliary Carry) 

Indicador de "Zero" (Z » Zero) 

Indicador de Sinal Algébrico (S = Sign) 


(O BIT-0 è o BIT “Mais à Direita" ou “BIT de mais Baixa Ordem"» 
e o BIT-7 é o BIT "Mais è Esquerda" ou "BIT de mais Alta 
Ordem" ) , 

Destes» somente os indicadores CY e Z interessam mais de perto 
aos nossos propósitos. 
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IMDICADOP DE TRANSPORTE (CARRY-STATUS - CY) 

0 Indicador CY é "Ligado" pelo Z-80 (valor 1) quando uma 
instrução "Desloca para Fora" (Transporta " ) o BIT à 

esquerda do campo onde é colocado o resultado da operacao. 
Por exemplo» quando o resultado da Soma de um valor ao 
Registrador A "excede" a sua capacidade (855 = #FF), ou quando 
uma subtração resulta "Negativa . 


INDICADOR DE ZERO (Z) 

0 Indicador Z é "Ligado" pelo Z-80 (Valor 1) quando uma 
operação resulta em valor Zero» e "Desligado (Valor 0) quando 
o resultado é diferente de Zero. 

Por exemplo» após a instrução de "Subtração do Registrador A 
Dele Próprio" o resultado é Zero» e 2 estará "Ligado". 

CÚDIGOS DE "LIGADO/DESLIGADO" PARA CY E 2 


CY 

= i 

(C) 

Ligada (acorreu Transporte) 

CY 

= 0 

(NC) 

Desligado (não acorreu Transporte) 

2 

= 1 

(Z) 

Ligado (resultado Zero) 

2 

= 0 

(NZ? 

Desligado (resultado diferente de Zero) 


08.3 - PILHA DO SISTEMA 

É uma área de trabalho que inicia em um endereço da memória 
RAM, que pode ser escolhido pelo usuário, e ê constituída por 
um “Espaço de Endereços Reservados", onde podem ser 
"Empilhados" vários "Blocos de DDIS BYTES cada um". 

Existem "Instruções do Z-80" próprias para "Colocar" e 
"Retirar" estes "Pacotes" de dois BYTES na/da PILHA. 

A PILHA DG SISTEMA existe para "Salvarmos" temporariamente, de 
uma maneira simples e rápida» o conteúdo das Areas de Trabalho 
do Z-80, enquanto elas são utilizadas com outros valores por 
outras rotinas, recuperando póster iormente os valores 
originais. 

É importante informar que nunca podem ser Esquecidos pacotes 
na pilha» pois ela compartilha a memória RAM com os programas» 
e poderá "destruir" estes programas se crescer além da área 
previamente reservada (o Z-80 não controla estes limites). 

08. A - REGISTRADOR SP (APONTADOR DE PILHA - STACK-POINTER) 
0 Registrador SP (STACK-PGINTER ) é outra "Area de Trabalho do 
2-80, sendo um campo de dois BYTES que indica para o Z-80 o 
endereço do "Bloco Atual Disponível" na PILHA D0 SISTEMA.^ 

É interessante observar que a PILHA “cresce para Baixo", ou 
seja, os pacotes são empilhados no sentido do maior para o 
menor endereço na memória. 

É interessante também observar que o Indicador SP aponta sempre 
para uma posição "Livre", imediatamente seguinte à posição 
"Ocupada" pelo último pacote armazenado na PILHA. 

08.5 - REGISTRADOR PC (CONTADOR DE PROGRAMA - PROGRAM-COUNTER ) 
A última área de trabalho do 2-80 aqui citada è o Registrador 
PC (PROGRAM-COUNTER), que é um campo de dois BYTES onde o Z-80 
guarda o endereço da "I nstrucão Seguinte" àquela que está sendo 
executada . 
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03 — LINBUAQEM DO Z-8C 


Como já dissemos, a maioria das operações que comandamos ao 
Z-80 para execução estão relacionadas ás suas áreas de trabalho 
e à memória RAM/ROM* e se destinam a tratar com o seu conteúdo. 

As "Tarefas** (ou "Funções*') que o Z-80 pode executar são 
pré-definidas, assim coma a "Linguagem" que comanda estas 
tarefas, e são elas que d caracterizam e diferenciam dos demais 
processadores existentes <da mesma forma, as Funções e Sintaxe 
do BASIC é que o diferenciam das demais linguagens). 

Cada Função a ser executada possui um "Código" ou "Palavra" 
associada, que pode ocupar um ou dois BYTES, e corresponde a 
uma operação específica a ser executada sobre uma das áreas 
citadas. 

Assim, ex itera "Palavras* 1 para "Movimentar BYTES de um lugar 
para outro, "Palavras" para "Somar o conteúdo de duas áreas de 
trabalha" , etc . 

Estas palavras, mais a "Sintaxe*" empregada para a sua 
utilização (regras de escrita), constituem a "LINGUAGEM DO 
Z-80". 

Vejamos um exemplo de uma "Palavra" pertencente à "Linguagem 
do Z-BO" e que pode ser por^ ele entendida e processada. 
Suponhamos que os BYTES que serio percorridos para buscar e 
executar as "Instruções do Programa" contém os seguintes 
valores (Representação Hexadecimal ) : 


#C5 #3E #05 #67 , . , 

Ao analisar o primeiro BYTE do programa (#C5), o Z-80 
"Reconhece" o seu conteúdo como uma "Palavra" (ou Instrução) 
que solicita a execução da função "Armazene o conteúdo do Par 
de Reg istradores BC na PILHA DO SISTEMA" . 

Como nenhuma informação adicional é necessária para a execução 
desta função, o Z-80 executa jmedí atamente esta ordem, 

colocando o conteúdo do REG-BC na PILHA e atualizando o 
Registrador SP, e passa para a próxima "Palavra* 1 que, neste 
caso, começa no BYTE imediatamente seguinte, pois a presente 
instrução ocupa apenas UM BYTE (é o PC - CONTADOR DE PROGRAMA, 
que guarda este endereço, lembra-se ?), 

Ao examinar o BYTE seguinte (#3E), ele "Reconhece" a 

solicitação da Tarefa 'Coloque no ^Registrador □ valor 

contido no BYTE imediatàmente seguinte" ao BYTE #3E". 
Prontamente o Z-80 "Obedece" e coloca no Registrador A o valor 
#05. 
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Neste case, a "Instrução Z-8Q" "ocupou" dois BYTES, o primeiro 
indicando "0 QUE FAZER" (#3E), e o segundo fornecendo úm 
PARÈmETRO (#05 - no casa uma constante) para ser utilizado na 

sua execução. _ ... 

Portanto, o "Tamanho" de cada Instrução é variável, dependendo 
(jg Tipo de Função a ser executada (o Z— 80 Conhece os 

tamanhos de cada uma de suas Instruções). 

0 BYTE seguinte á Instrução Z-80 "#3E #05" contém o valor #B7, 
e informa ao Z-80 que ele deve "somar o valor contido no 
Registrador A aa próprio Registrador A . 

Como a Instrução anterior colocou em REG-A o valor #05, após 
esta Instrução o Registrador A conterá #0A, que è o resultado 
da soma (#05 + #05). u „ 

Além disto, o Indicador CY estará “Desligado- NC , pois nao 
ocorreu ^Estouro 11 $ s o Iodicâdor 2 Desli^âdo — NZ ? 

pois o resultado “#0A" é “Diferente de Zero". 


A LINGUAGEM ASSEMBLER 

Como voe? deve ter percebido, a “Linguagem de Máquina" do 
Z-80 nao é “Fácil" de ser memorizada e utilizada, pois somente 
"Reconhece" símbolos representados por combinações de valores 
compreendidos entre #00 e #FF (Menor e Maior valores que podem 
estar contidos em um BYTE). 

Para contornar este problema, visando tornar mais Fácil a 
elaboração de programas para o Z-80, foi construída uma Outra 
Linguagem", utilizando símbolos de tratamento mais práticos e 
de fácil memorização pelas pessoas. 

Esta "Linguagem" é muito “Próxima da Linguagem de Máquina do 
Z-80 (cada “Palavra" desta linguagem tem correspondência quase 
"Direta" com as "Palavras" reconhecidas pelo Z-80), e por este 
motivo também é considerada uma linguagem de Baixo Nível . 


0 NOME DESTA L I NGUAGEM t "ASSEMBLER DO 2-80". 

Obviamente, é necessário "Um Novo Programa" para "Transformar" 
(ou "Montar", ou ainda “Compilar") um programa escrito em 
‘ASSEMBLER Z-80" para a "Linguagem de Máquina do Z-80 (o 
Código em Linguagem de Máquina assim gerado ê denominado 
"Código Objeto"). 


0 NOME DESTE PROGRAMA É "COMPILADOR ASSEMBLER D0 Z-80". 

É interessante observar que, como cada Microprocessador Fala 
uma Linguagem própria e exclusiva, cada um deles também têm o 
seu ASSEMBLER (MONTADOR) próprio. 


III - 0 PROCESSADOR 2-80 


111 


LIN6UA6EM ASSEMBLER - EXEMPLO 

As "Instruções ASSEMBLER" correspondentes às Instruções do 2-90 
utilizadas no último exemplo analisado seriam escritas da 
seguinte maneira : 

Q010 INICIO: PUSH BC 

00E0 LD A, #03 

0030 ADD A, A 

# 

0010 (PUSH = "Empurre" ) Comanda ao 2-80 a Função “Armazene na 
PILHA DO SISTEMA" o valor contido np Registrador BC._ 

0020 (LD = LÕAD = "Carregue") Comanda ao 2-80 a função 
"Carregue* ou "Armazene 11 o valor #03 no Registrador A. 
0030 í ADD - "Some") Comanda ao Z-80 a fução "Some 11 o valor 
contido no Registrador A ao próprio Registrador A- 

□ "Programa COMPILADOR ASSEMBLER" "li" os comandos assim 
-escritos e os transforma na "Linguagem de Máquina Z-80% que é 
entendida por este processador Í#C5 #3E #05 #87), 

MUITO MAIS FdCIL * NSO É MESMO ? 

A "Sintaxe" (regras de codificação) exigida pelo ASSEMBLER 
pode variar de compilador para compilador. 

Para o compilador utilizado para a BIT-BASIC as regras sao as 
seguintes : 

Exemplo : 0010 ROls LD A, #20 

NÚMERO : 0010 

Cada linha do "Programa ASSEMBLER 11 é numerada» à semelhança^ da 
Linha de Programa BASIC (Primeiras posições da Instrução). 

NOME : R01 , H 

Além do número» uma instrução "Pode Ter" (opcional) um Nome 
colocado em seguida ao "Número"» que poderá ser utilizado por 
outras instruções» onde representará o "Endereço" desta 
instrução* 

FUNÇSO : LD 

Em seguida deve ser colocada a "Função" a ser executada por 
esta Instrução ASSEMBLER (Movimentação» Soma» etc,), 

PARSMETROS i A» #20 

Logo após devem aparecer os "Parâmetros" sobre os quais a 
Função será executada (tíreas de Trabalho do 2-0O» Areas de 
Trabalho do seu próprio programa na memória ROM/RAM* Valores 
Constantes , etc . ) . 

QBSERVAÇ20 : Quando existem dois parâmetros a operação è 
normalmente efetuada do Segundo para o Primeiro 
(no exemplo acima a constante #20 é carregada 
em REG-A), 


ne 
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I NSTRUÇOES ASSEMBLER 


Neste item mostraremos as "Palavras 
que determinam ao 2-BO _as funcoes 
a descrição destas funções . 

Os “Códigos Z-80" correspondentes 
(entre parêntesis) . 


da linguagem ASSEMBLER 
a serem executadas, com 

serão também mostrados 


Inicialmente descreveremos cada "Tipo de Função" e em^ seguida 
as "Variações" que ela oode sofrer, dependendo do Tipo de 
Parâmetro" com □ qual está trabalhando tum Registrador, um 
Endereça» uma Constante» etc-)* „ . 

Os diferentes tipos serão apresentados com a utilização tle 

exemplos- 

A LISTA COMPLETA DAS INSTRUÇÕES ASSEMBLER ESTA MO APÊNDICE 07. 


Para nos referirmos aos^ Registradores 
sempre t por simplificação» o prefixo 
ídent if icacão dc Registrador 


do Z-BO utilizaremos 
"REB-" » seguido pela 
ou Par de Registradores. 
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ADD 

ADD = "SOME' 


Estas instruções ASSEM9LER correspondem a Instruções 2-80 cuja 
função è somar o, valor de uma Area de Trabalho ou o 
valor contido em um endereço de memória, em outra Area de 


Trabalho do Z-80. 

A Instrução BASIC XX-XSS+YX executa 


função semelhante - 


Gs Indicadores de Estado são posicionados de acordo com o 
resultado da soma# 

Por exemplo» se ocorrer um "Estouro" <o resultado nao 
M Cabe K na área onde deve ser colocado) »o Indicador de Transporte 
CY é “Ligado" 


0010 


ADD 

A, (HL) 

(#86) 


0020 


ADD 

A,#A6 

(#C6 #A8> 


0030 


ADD 

HL, HL 

(#29) 


0010 

Soma 

em REG-A 

□ valor 

do BYTE 

apontado por REtí^HL* 

0020 

Soma 

o valor #A8 em REG-A 



0030 

Soma 

REG-HL 

em REG-HL 

( "Dobra" 

□ valor contido em 


REG-HL) . 


INDICADORES DE ESTADO CY,Z 

(Primeiro Operando = Par de Registradores) 

í Instrução 0030 do Exemplo) 

Não são afetados. 


INDICADORES DE ESTADO CY»Z 

(Primeiro Operando = Registrador Único ou Endereço de Memória) 
(Instruções 0010 e 00E0 do Exemplo) 


Resultado menor do que Zero ou "Estouro 
Resultado igual a Zero 
Resultado maior do que Zero 


C,NZ 
NC» Z 
MC,MZ 
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AND /DR/XOR 

AND = "E” 

OR = ‘OU' 

XOR = ‘EXCLUSIVE OR * "DU EXCLUSIVU" 


Estas Instruções ASSEMBLER dão origem a Instruções 2-80 que 
efetuam a ‘COMPARAÇ20 BIT A BIT" do conteúdo do Acumulador 
(REG-A) com a conteúdo de outro Registrador ou posição 

4e memória. 

0 resultado da comparação de cada par de BITS è recoldcado na 
posição correspondente de REG-A. 

Qs Indicadores de Estado são posicionados para refletir as 
condições da comparação - 

As Instruções BASIC "A=A0RB" , "X=XANDY, Z=ZX0RA", por exemplo, 
executam funções semelhantes sobre as áreàs de trabalho 
especificadas (também BIT a BIT). 


A comparação pode ser feita segundo tr?s critérios diferentes 
(AND, OR ou XOR), a seguir descritos. 


- Modalidade AND (E> 

0 BIT resultante é 1 (Ligada) somente se os dois BITS 
comparados são 1. 

REG-A 1010001 1 

BYTE COMPARADO 1 1001001 

RESULTADO 1 0 0 0 0 0 0 1 


- Modalidade 0R fOU) 

0 BIT resultante é 1 (Ligado) se qualquer dos dois BITS 
comparados é 1. 

REG-A 1010001 1 

BYTE COMPARADO 1 1001001 

RESULTADO 11101011 


- Modalidade XOR (0U EXCLUSIVO) 

0 BIT resultante ê 1 (Ligado) somente se apenas um dos dois 
BITS comparados é 1. 

REG-A 1010001 1 

BYTE COMPARADO 11001001 
RESULTADO 01 1 0 I 0 1 0 
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0010 

AND 

E 

(#A3> 




0020 

DR 

(HL) 

( #86 ) 




0030 

XOR 

#FF 

Í#EE 

#FF) 



0040 

AND 

A 

( #A7 ) 




0010 

Compara REG-A 

com REG-E, 

8IT a 

BIT, 

na 

modalidade AND? 


colocando o resultado em 

REG-A 

m 



0020 

Compara REG-A 

com o conteúdo do BYTE 

apontado por REG-HL ? 


BIT a BIT, na 

modal idade 

0R, 

colocando 

o resultado da 


comparação em 

REG-A. 





0030 

Compara REG-A 

com d valor 

#FF , 

BIT a 

BIT 

t na Modalidade 


XOR, colocando □ resultado em REG-A. 

É interessante observar que» se REG-A contém inicialmente 
#00? a cada nova passagem pela instrução "XOR #FF" 
REG-A conterá? alternadamente? os valores #FF e #00. 

Esta é uma técnica interessante para utilizarmos como uma 
fundo que "Liga/Desliga 11 um Indicador em um programa 
ASSEfIBLER . 

OOAO Compara REG-A com o próprio REG-A, 0IT a 0IT, na 
Modalidade AND? colocando □ resultado da comparação em 
REG-A* 

É interessante observar que neste caso o valor 

resultante é sempre #00? e os Indicadores CY e Z resultam 
sempre í2?NC). 

Podemos utilizar esta instrução para "Zerar" o conteúdo 
de REG^A ou p ara “Forcar" o posicionamento dos 
Indicadores de Estado. 


INDICADORES DE ESTADO CY,Z 

Resultado igual a Zero : Z,NC 

Resultado diferente de Zero : NZ,NC 
(Estas Instruções sempre "Desligam" □ 


Indicador CY. > 
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CALL 

CALL = "CHAME" 


Estas Instruções ASSEMBLER são Transformadas _em Instruções 
de Máquina do 2-80 que determinam a execucao de um certo 
“Conjunto de Instruções", localizadas em algum endereço na 
memória, com RETORNO posterior para a instrução imediatamente 
seguinte à instrução CALL. 

pode comparar a função desempenhada por esta Instrução 
2-80 com a função da Instrução G0SU8 do BASIC (que possui a 
Instrução RETURN para comandar o Retorno ao ponto de chamada). 

ü Endereço de início da rotina a ser "Chamada 1 ' é colocado no 
"Operando de Endereço" da instrução CALL. 

A instrução CALL usa a PILHA DO SISTEMA para "Salvar" o 
endereço de RETORNO (endereço da Instrução imediatamente 
seguinte à Instrução CALL). 

Para comandar o Retorno no ponto desejada da rotina chamada 
existe outra Instrução do 2-80 que deve ser utilizada: 
Instrução RET. (Descrita adiante.) 

A chamada também pode ser feita "Sob Condição Determinada". 


0010 CALL #C000 <#CD #00 #C0> 

0020 CALL DESVIO <#CD #00 #C0> 

0030 CALL N2 , #C000 ( #FC #00 #CO> 

0010 Efetua "Chamada" à "Rotina" que inicia no endereço #COOO. 
0020 Efetua "Chamada" à "Rotina" DESVIO (que inicia no 
endereço #C000). 

0030 Efetua "Chamada" à "Rotina" que inicia no endereço #LÜO0. 
mas somente se o Indicador 2 estiver "Desligado". 

Caso contrário executa a instrução imediatamente seguinte 
á instrução CALL. 


INDICADORES DE ESTADO CY,2 
Não são afetados. 
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CCF 

CCF * CDhPLÊMENT CARRY-FLA 6 = 

* COMPLEMENTE IND I C ADDR-DE- TRANSPORTE " 


Esta Instrução AS5EMBLER è compilada em Instrução Z-Bü cuja 
função é "Complementar o valor do Indicador de Estada CY" 
í CARRY-FLA6 - INDICADOR-DE-TRANSPQRTE) . 

Q valor do BÍT-0 do Registrador F, que desempenha o papel de 
Indicador CY" , pode conter os valores “0" ou “1“, 

‘Complementar” o valor atual de CY significa ”Somar 1” a este 
valor j com o que o seu conteúdo é M Inver t i do” pela instrução 
CCF, ou seja 7 se for **0“ passará a ser ” 1 “ > e vice-versa. 


Q0 10 

AND 

A 

(#A7) 

0020 

CP 

#01 

< #FE #01) 

0030 

CCF 


!#3F) 

00A0 

JP 

C , #B500 

(#DA #00 


0010 Coloca #00 no REG-A. 

OOEO Compara REG^A com #01. 

Come o conteúdo de REG-A (#00) é “Menor do que #01", o 
Indicador CY será “Ligado" (" 1 M - “C" ) por esta 

I nstrucao . 

0030 "Complementa" (ou "Inverte") o valor do Indicador CY. 
Como CY foi posicionado em 11 1 Jl pela instrução anterior, 
apás esta instrução seu valor passa a ser "0" 
rDes ligado" = "NC"). 

00A0 Nao desvia para a □ endereço #B50G, pois a condição "C" 
ECY Ligado) não será satisfeita, passando para a 
í nstrução seguinte do programa. 


INDICADORES DE ESTADO CY,Z 

CY = C ou NCi se o seu valor anterior era NC ou C. 
(0 Indicador Z nao é afetado.) 
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CR 

CP = COMPARE = "COMPARE" 


Estas instruções servem para "Comparar" o conteúdo de REG-A 
com outra valor, "Posicionando" (Ligando/Desl igando) os 
"Indicadores de Estado" do Registrador F, 

O Resultado da comparação pode ser verificado pôster i armem te 
por outras instruções (Analisando os Indicadores de Estado) e 
diferentes procedimentos podem ser executados em funcao deste 
fesultado. 

A instrução BASIC "IF A*/,=&H3B", por exemplo, executa funpão 
semelhante. 


0010 

CP 

#3B 

( #FE #3B) 

0020 

CP 

D 

<#BA> 

0030 

CP 

(HL) 

(#BE) 

0010 Compara 

REG-A 

com #3B. 



0020 Compara REG-A com REG-D. 

0030 Compara REG-A com o BYTE que está no endereço apontado 
pelo REG-HL. 


INDICADORES DE ESTADO CY,Z 


REG-A "Menor" 
REG-A "Igual" 
REG-A "Maior" 


que Operando 
ao Operando 
que Operando 


C,NZ 

NC.Z 

NC,N2 
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CP X R 

CP IR = COMPARE / INCREMENT REGI5TER = 

“COMPARE / INCREMENTE REGISTRADOR" 


Est3 Instrução ASSEMBLER é compilada em Instrução de Máquina 
do Z-BO que efetua as seguintes operações : 

- Compara o conteúdo de REB-A com o BYTE apontado pelo 
endereço contido em REG-HL. 

- Se a comparação resultar "Igual % passa para a instrução 
imediatamente seguinte á instrução CP1R (neste caso com o 
Indicador Z "Ligado"), 

- Subtrai 1 de RE6-BC - 

- Se o resultado da subtração for "Zero", passa p ara a 

instrução seguinte (neste caso , com o Indicador 
"Desligado''). 4( 

- Se o resultado da subtração for "Diferente de Zero f Soma 1 
a REG-HL e repete todas as operações anteriores. 

Esta instrução é utilizada para "Procurar" um valor 
determinado, BYTE a BYTE , a partir de um endereço, em um 
trecho de memória determinado. 

Todas as operações de busca sao efetuadas com APENAS UMA 
Instrução de Máquina, sob controle "Interno" do Z-BO . 


0010 

LD 

HL,#BOOO 

(#81 

#00 

#00) 

0020 

LD 

BC, «0005 

(#01 

#05 

#00) 

0030 

LD 

A,#AA 

( #3E 

#AA> 


00 A0 

CPIR 


( #ED 

#B1 > 


0050 

JP 

Z jENCONT 

( #CA 

#D5 

#CD í 

0060 

JP 

NA0ENC0NT 

( #C3 

#55 

#CA) 


0010 Carrega #BOOO em REG-HL, 

0020 Carrega #0005 em REG-BC. 

0030 Carrega #AA em REG-A. 

0QA0 Compara REG-A com cada BYTE, a partir do endereço #BO00 

{REG-HL ) , até encontrar um cujo valor seja "Igual a #AA 

(REG-A), ou até terem sido comparados 05 BYTE5 ÍRE6-BC). 

0050 Se um valor igual ao de REG-A (#AA) foi encontrado, 
desvia para a instrução ENCQNT ^Endereço #CDD5) . 

0060 Se um valor igual ao de REG-A não foi encontrado, desvia 
para a i nstrução NADENCONT (Endereço #C A55 > . 

INDICADORES DE ESTADO CY,Z 

Z - Valor procurado foi encontrado. 

NZ - Valor procurado nao foi encontrado. 

CY - Não ê afetado. 

As seguintes Instruções BASIC executariam função semelhante* 

FOR I “&HBOQOTO&HEOOA : A=PEEK í 1 ) : I FA< >&HAATHENNEXTI : ELSEGÜTOENCQNT 
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DEC/ INC 

DEC = DECREMENT = “DECRE MENTE" 
INC = INCREMENT = “INCREMENTE" 


Estas instruções ASSEMBLER são Compiladas em Instruções Z-80 
que efetuam as operações de “Somar l n ou de “Subtrair 1" dos 
registradores ou endereços indicados* 


A Instrução 
semelhante. 

BASIC 

XY*=XY.+1, 

por exemplo* 

executa função 

0010 

DEC 

A 

í #3D ) 


OOSO 

DEC 

HL 

(«EB) 


0030 

INC 

(HL) 

(«34) 


0040 

INC 

SP 

(#33) 



0010 Decrementa 1 (Subtrai 1 ) de REG-A. 

0020 Subtrai 1 de REG-HL, 

(D Par de Registradores HL é tratado como se fosse um 
"Número Único"» com o que á possível trabalhar com 
valores entre #0000 e #FFFF_) 

0030 Incrementa 1 ESoma 1) no BYTE apontado pelo endereço 
contido em REG-HL * 

Se REG-HL contém #0000, por exemplo , o BYTE cont ido neste 
endereço terá seu valor acrescida de 1. 

OQA0 Soma ! ao Registrador SP (Apontador de Pilha - Stack 
Pointer ) , 


INDICADORES DE ESTADO CY f Z 
(Operando = Par de Registradores) 
(Instruções OGEO/OOAO do Exemplo) 

Nao são afetados* 


INDICADORES DE ESTADO CY,Z 

(Operando = Registrador único ou Endereço de Memória? 
(Instruções 0010 e 0030 do Exemplo) 

Resultado menor do que Zero : NZ 
Resultado igual a Zero : Z 

Resultado maior do que Zero : NZ 
(0 Indicador CY nao é afetado) 


III - INSTRUÇÕES A55EMBLER (DJNZ) 


íai 


DZFW^ 

DJNZ = D£CREh£NT/JUhP-R£LAT!VE/N2 

( SUBTRAI A/DESVIE-RELATIVO/NZ) 


Esta instrução ASSEÍ1BLER corresponde a uma Instrução Z~BO que 
efetua os seguintes procedimentos : 

- DECREMENTA íou subtrai) de 1 o conteúdo do Registrador B, 

- Se a vaiar resultante em REG^B for “DIFERENTE DE ZERO' 1 íNZ), 
o Z-BO “Desvia^para uma instrução de deslocamento RELATIVO em 
relação á i nstrucão DJNZ, 

Este deslocamento é armazenado de forma semelhante ás 
instruções JRi de acordo com o “Número de BYTES* J existentes 
entre a Instrução DJNZ e a Instrução p ara onde □ desvio deve 
ser efetuado. 


0010 

LD 

B,#05 

(#06 #05) 

00 20 

LD 

A, #00 

( #3£ #00) 

0030 flOl : 

ADD 

A,B 

(#80) 

00#0 

DJNZ 

A01 

(#10 #FD) 

0050 

RET 


( #C9) 


0010 Carrega #05 em REG-B, 
0020 Carrega #00 em REG-A. 
0030 Soma REG^B em REG ^ A , 
0040 SUBTRAI 1 de REG-B. 


Se o resultado for “Diferente de Zero'*, DESVIA 
Í#FD representa um “Desl ocamento Relativo 11 de 
"Para Trás 11 em relação ao endereço onde 


colocado ) . 

Se o resultado for "Zero% passa para a 
seguinte f 0050 RET S . 


para AQi* 
Dois BYTES 
#FD está 

Instrução 


INDICADORES DE ESTADO CY,Z 
Não são afetados. 


D seguinte programa BASIC executa função semelhante á do 
programa A55EMBLER exemplificado : 

10 B%=5;AY.=0 
20 AY,=AY,+BY, 

30 B%-B*/*-l : IF B*/.OQ THEN GOTO 20 
40 RETURN 


122 III - INSTRUÇÕES AS5EMBLER t EX > 

EX 


EX = EXCHANGE = "TROQUE" 

Estas Instruções ASSEMBLER slo convertidas para Lnstf 
2-80 cuja fundo ê efetuar a "Troca de Conteúdo 
Registradores e Memória 1 '. 


0010 EX DE, HL (#EB> 

0020 EX (SP), HL (#E3> 

0010 Efetua a troca de conteúdos entre os Registradores 
HL . 

0020 Efetua a troca de conteúdos entre REG-HL e os dois 
apontados por REG— SP . 


upões 

entre 


DE e 
Bi TE5 


INDICADORES DE ESTADO CY,Z 
Não são afetados. 


III - INSTRUÇÕES ASSEI1BLER (IN) 
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ira 

IN = INPUT = "ENTRADA” 


Estas Instruções ASSEMBLER são transf or madas em Instruções 
2-BO cuja função è "Carregar em um Registrador um BYTE obtido 
a partir de uma PORTA^DE- I/D" < 

Rara os nossos propósitos nao é necessária saber como esta 
instrução funciona "Internamente" i sendo suficiente sabermos 
flue ela serve para o Processador Z~8Q se "Comunicar" com 
outros Processadores existentes no seu HSX. 

Esta comunicação é feita por intermédio de “Ligações" 
apropriadas existentes no Z-BO* chamadas de PÜRTA5-DE-I/G (1/0 
= í NPUT /OUTPUT - ENTRADA/5AIDA) , 

0 Z-BO pode se comunicar 5 por exemplo, com o Processador PPl 
(Programmable Perlpheral Interface - Interface Programável de 
Periféricos) que, entre outras coisas, "Gerencia" o Teclado do 
USX* e "Gerencia" os Bancos de Memória ROM/RAM. 

Com o uso desta instrução podemos, por exemplo, descobrir qual 


a configuração 

atual 

destes 

Bancos de Memória- 

Função semelhante é 

executada 

pela Instrução INP do BASIC. 

0010 

IN 

A, < #A8) 


( #DB #A8) 

0020 

LD 

C,#A8 


( #OE #AB) 

0030 

IN 

B , < C > 


íttED M0) 

0010 Transfere 

para 

D REG-A 

o 

valor de um BYTE contido na 


Porta de I /O ident if içada como #A0 
PPI ) * 


(esta è a Porta do 


0020 Carrega □ valor #AB em REG-C, 

0030 Transfere para REG-B um BYTE da Porta #A0 (equivalente â 
Instrução 0010). 


INDICADORES DE ESTADO CY,Z 
Não são afetados. 
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III - INSTRUÇÕES ASSEM8LER < JP/JR) 


JP/JR 

JP = JUMP = "PULE" ou M SALTE" 

JR * JUMP RELATIVE = "PULE RELATIVO" 


Estas Instruções A55EMBLER são Transformadas ^ em ^ Instruções 
de Máquina? que determinam ao Z-80 que um "Desvio" deve ser 
efetuado* ou seja» que a próxima Instrução a ser executada rtao 
è aquela imediatamente seguinte á atual» como seria seu 
procedimento normal, mas sim uma outra instrução cujo endereço 
é determinado pela Instrução JUMP- 

VocÊ pode comparar a função desta Instrução com a função da 
Instrução "GO TO" ("Vtí PARA") do BASIC, 

É possível comandar ao 2-80 ^que efetue o Desvio desejado 
somente se uma certa condição for satisfeita por um dos 
Indicadores de Estado. 


0010 

RT1; 

JP 

#3E4C 

<#C3 

#4C 

#3E ) 

0020 


JP 

RTF 

( #C3 

#B4 

#C7) 

0030 


JP 

(HL) 

<#E9) 



0040 

RT8: 

JP 

C,#3E4C 

< #DA 

#4C 

#3E ) 

0050 


JP 

NZ,#3E4C 

<#ce 

#4C 

#3E ) 

0060 


JR 

$+5 

(#10 

#03) 


0070 


JR 

NC, í-10 

(#30 

#F4 í 


0010 

Desvia 

" Incond ic i ona 1 mente" 

para o 


Endereço #3E4C . 
Portanto, a próxima instrução a ser processada pelo Z-80, 


Instrução RT1, á aquela que inicia 


no 


endereço 

Endereço 


após a 
♦3E4C- 

DOPO Desvia " Incond í c i ona 1 mente" para 

cor respondente á Instrução de Nome RT8, 

Observe que o "Código de Instrução" da linha 0080 í#LJ) ê 
igual ao da linha 0010, e que o campo de Endereço da 
instrução 0080 é obtido pelo compilador ASSEMBLER, sendo 
o endereço onde ele próprio colocou a instrução de nome 
RT2. 

0030 Desvia "Incondicionalmente" para o Endereço apontado por 
REG-HL* 

Se REG“HL contém, por exemplo, #AE4F , a próxima 
a ser executada pelo 2-BO será aquela que está 
neste endereço, 

0040 Desvia para a instrução que inicia no endereço #3E4C, 
somente se o Indicador de Estado 
(Condição C no primeiro "Operando" da 
Esta técnica pode ser utilizada, 
efetuar o desvio somente se uma 
resultou "Negativa", 

Se CV está "Desligado" (NO, o 


instrução 
armazenada 

mas 

CV está "Ligado" 
Instrução ) . 
por exemplo, para 
compar ação anter i or 


2-80 


processamento na 
instruccão JUMP* 


instrução i med i a t amente 


continua 

seguinte 
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0050 Desvia para a instrução que inicia no endereço #3E*tC* mas 
somente se o Indicador de Estado 2 está ^"Desligado 
[Condição NZ no primeiro "Operando" da Instrução), 

Esta técnica pode ser utilizada* por exemplo* para 
desviar somente se uma comparação anterior resultou 
“Diferente de Zero”. 

Se 2 está "Ligado 11 ( Z > o 2-80 continua o processamento 
na instrução imediatamente seguinte à instrução JUHP. 

0060 Desvia " Incondic lona Imente" para o "Endereço de Início da 
Instrução Atual + 5' 1 iquinto BYTE após o início da 
Instrução 0060). 

0 símbolo indica ao Compilador o "Endereço de inicia 

da Instrução atual”, 

0070 Desvia para o “Endereço de Início da Instrução Atual 

10 1 *, mas somente se o Indicador de Estado CY estiver 
"Desl igado’ 1 . 

Como você pode observar* as Instruções JR CJUtIP RELATIVE) tem 
três diferenças principais em relação ás Instruções JP ÍJLHIP), 

, As Instruções JR ocupam um número menor de posições de 
memória (dois BYTES, contra três BYTES para ^instruções JP). 

« Nas Instruções JR o endereço de Desvio não muda caso o 
programa seja "Trocado de Lugar" na memória (o "Deslocamento 
Relativo" permanece o mesmo). 

No caso das Instruções JP, o endereço é armazenada de forma 
"Explicita" e terá que ser modificado para o novo endereço 
onde ficará a Instrução de destino "Rea 1 ocada" . 

, As Instruções JR somente podem desviar para instruções que 
estejam numa "Distância" que possa ser representada em um 
única BYTE (-126 a +129), 


INDICADORES DE ESTADO CY,Z 
Nao são afetadas. 
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III - INSTRUÇÕES ASSEMÔLER < LD) 


LD 

LD = LOAD = "CARREGUE 11 


Estas* Instruções A5SEMBLER são 11 Transf ormadas JÍ em Instruções 
de Máquina (pelo programa Compilador ) que indicam ao 2-80 para 
efetuar a "Movimentação" de conteúdos entre determinados 

-e as "Areas de 

exemplo* executam 


"Endereços" 

de 

memória RDM/RAM ê/ou erV 

Trabalho" do 

2-80 

9 


As Instruções BASIC " AY*~3 e 

"X1X=Y2X", por 

função semelhante 

■ 


0010 

A01 : 

LD 

A, #03 

( #3E #03) 

0020 


LD 

B,C 

(#41 ) 

0030 


LD 

A, (HL) 

( #7E > 

0040 


LD 

A j (#B000) 

( #3A #00 #B0 ) 

0050 


LD 

Ai < A01 > 

( #3A #5F #BD ) 

0060 


LD 

HL, #1234 

(#21 #34 #12) 

0070 


LD 

HL, (#1234) 

( #2A #34 #121 

0080 


LD 

HL , A0 1 

(#21 #5F #BD ) 

0090 


LD 

HL, ( A01 ) 

(#2A #5F #BD > 

0100 


LD 

D , ( HL ) 

(#72) 

0110 


LD 

( IX+10) ,H 

( #DD #74 #0A ) 

0010 

Carrega 

a Constante #03 

no RE6-A. 

00E0 

Carrega 

( ou 

Copia) o conteúdo do REG-C 

0030 

Carrega 

no REG-A o BYTE 

apontado pelo i 


REG-HL 

(atenção para os 

Parêntesis que 


ereço contido no 
volvem HL) * 

Por exemplo* se REG-HL contém #8000, e □ BYTE existente 
no endereço #8000 da memória contém #FF* REG-A conterá 
#FF após a execução desta instrução. 

0040 Carrega em RE0-A o BYTE contido no endereço # 8000 * 

Se este BYTE contém #FF , REG-A passará a conter #FF . 
(Observe a diferença entre a instrução 0010, sem 

parêntesis* que carrega uma "Constante (Segunda 

□peranda) em RE6-A, e esta instrução, que 
parêntesis* a qual faz referencia a "Outro 
Memória. ) 

A "Instrução de Máquina" neste caso ocupa 
sendo o primeiro o "Código da Função" a ser 
os dois seguintes o "Endereço a Partir do 
deve ser Movido para o Registrador A". 

0050 Carrega no REG-A o BYTE apontado pelo endereço 

correspondente ao n Nome de Instrução" (ou LABEL) A01 . 
Supondo que a "Instrução" que tem este nome foi colocada 
no endereço #BD5F * REG-A conterá o BYTE que existe neste 
endereço apôs a execução desta instrução. 

0 COMPILADOR AS5EMBLER é quem coloca as instruções a 
partir de endereços determinados 0, pôster iormente * 
"Substitui" as referencias a "Nomes de Instruções" pelos 
endereços correspondentes* produzindo então um programa 
em "Linguagem de Máquina do Z-80". 

{ Este processo se denomina "Compilação do programa. ) 


contém 
Endereço" de 

três BYTES? 
executada e 
Qual o BYTE 
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0060 Carrega em REG-HL a "Constante" (Valor) #1234 (observe 
que na Linguagem Z-80 os BYTES que contém fí2 e 134 sao 
armazenados de forma "Inver t ida" na memória) . 

0070 Carrega em REG-HL os BYTES contidos a partir do Endereça 
#1234 da memória. 

Observe que as funções í Resultados das Instruções) das 
linhas 0060 e 0070 sio diferentes. 

Para representar esta diferença a "Linguagem ASSEè^BLER" 
não usa Parêntesis na primeira e os usa na segunda * 
enquanto que a "Linguagem Z-BO" usa "Códigos de 
Instrução" diferentes (#21 e #2A» respect ivamente ) - 
0080 Faz "a mesma coisa" que a instrução da linha 0060» enceto 
que □ Compilador converte o nome A01 pelo endereço da 
instrução correspondente (#BD5F), em tempo de Compilação 
[observe que os "Códigos de Instrução 2-80” são iguais 
para ambas as linhas). 

0090 Faz "a mesma coisa" que a instrução da linha 0070» 
valendo as mesmas observações da linha 0000. 

0100 Carrega no REG-D □ BYTE existente no endereço alentado 
pelo REG-HL . 

Se REG-HL contém? por exemplo» #BD5F e» neste endereço» tiá 
um BYTE que contém #CA então REG-D conterá 1CA apés a 
execução desta instrução^ 

Observe que esta Instrução Z-80 tem apenas um Bfl£ Ü728 
não necessitando de "Parâmetros". 

0110 Carrega d conteúdo de REG-H no Endereço apontado pelo 
RE6-IX acrescido de 10 unidades. 

Se REG-IX contém #CG00 e REG-H contém #4E. por ewlo? 
após esta instrução o BYTE do endereço "tCGOO + = 

*CGQA" conterá o valor #4E. 

Observe que esta função utiliza dois BYTES para ser 
“Reconhecida" pelo Z-80 Í#DD #74) e um BYTE onde é 
colocado □ valor a ser somado/subtraido ao “Registrador 
IX" í Reg i s trador de Índice) „ 

Os Reg ist r adores IX e IY são empregados como '‘Índices* 1 ea» 
Instruções deste tipo. 


INDICADORES DE ESTADO CY E Z 
Não são Alterados. 
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III - INSTflUÇfiES ASSEMBLER (LDIR) 


LDIR 


LDIR = LOAD / INCREMENT REGISTER = 

"CARREGUE / INCREMENTE REGISTRADOR’ 


Esta istrupio é Compilada em Instrução de 
efetua as seguintes operacoes - 

- Transfere o conteúdo do BYTE apontado 
endereço apontado por REG-DE. 

- Soma 1 em REG-HL e em REG-DE. 


Máquina do Z-BO que 
por REG-HL para o 


- Subtrai 1 de REG-BC. 

- Se o resultado da subtração for "Diferente de Zero , repete 

todas as operações anteriores^ u 

-Se o resultado da subtraçao for Zero , passa para a 
instrução imed iataraente seguinte à instrução LDIR. 


(Ela è utilizada para movimentar Blocos de BYTES d ^“m lugar 
para outro na memúria, sob controle do Z-80, com APENAS UMA 
"Instrução de Máquina", pois o "Programa 
" Internamente" todos os procedimentos 
necessários > . 


Z-QO* 

e 


executa 
controles 


0010 

0020 

0030 

00AO 


LD HL, #B000 
LD DE , #C0OQ 
LD BC,#O0FF 
LDIR 


(#21 #00 #B0> 
(#11 #00 #C0 ) 
(#01 #FF #00) 
( #ED #B0) 


0010 

Carrega 

D 

valor 

#B000 

ern 

0020 

Carrega 

o 

valor 

#COOO 

em 

0030 

Carrega 

o 

valor 

#00FF 

em 

00A0 

"Copia" 

255 BYTES ( #FF) , 


o endereço #COOO. 


REG-HL. 

REG-DE. 

REG-BC. 

a partir do endereço #BOOO, 


para 


INDICADORES DE ESTADO CY,2 
Não são afetados. 

As seguintes Instruções BASIC executariam função semelhante : 

HL=8,HBOOO:DE=ÍHCOOO:FORBC=255TOOSTEP-t :A=PEEK(HL+e55-BC>: 

P0KE ( DE+255-BC ) ,A:NEXTBC 
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OUT 

OUT = OUTPUT = "SAÍDA" 


Estas Instruções ASSEMBLER são transformadas em Instruções 
2-80 cuja função é "Carregar em uma P0RTA-DE-Í/0 o valor 
contido em um Registrador ou em um BYTE da memória". 

Esta é uma função "Inversa" àquela da Instrução IN e as 
observações lá efetuadas também são válidas para ela. 

Função semelhante è executada pela Instrução DUT do BASIC. 


0010 


LD 

A i #F0 

í #3E 

#F0 ) 

0020 


DUT 

<#A8) ,A 

Í#D3 

#AB) 

0010 

Carrega 

#F0 em 

REG-A. 



0020 

Envia o 

Valor 

#F0 para a 

PP I, 

via 

0030 


LD 

C,#A8 

í#0E 

#A8 ) 

0040 


LD 

B , #F0 

(#0Ó 

#F0 ) 

0050 


DUT 

(C) ,B 

( #£D 

#41 ) 

0030 

Carrega 

#A8 em 

REG-C. 



0040 

Carrega 

#FQ em 

REG-B. 



0050 

Envia o 

Valor 

#F0 para a 

PPI* 

via 


Porta de 1/0 "#Atí" 


porta de l/D " *tH0" 


(Equivalente á Instrução 0010.) 


INDICADORES DE ESTADO CY , Z 
Não são afetados. 
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PUSH/POP 

PU5H = "EMPURRE" 

POP = "SOLTE" 


Estas Instruções ASSEMBLER sao "Compi ladas" em Instruções 
de Máquina que determinam ao 2-80 a colocacao ou retirada de 
“Pacotes" (DOIS BYTES) na PILHA DO SISTEMA. 

A área de Trabalho SP < STACK-PDINTER - APONTADQR-DE-PILHA ) é 
automaticamente atualizada a cada vez que um "Pacote” é 
dolocado qu retirado da PILHA. 


0010 PUSH BC 
0020 PUSH AF 
0030 POP AF 


0010 

0020 

0030 


Armazena o conteúdo de REG— BC (dois BYTES) na PILHA DO 
SISTEMA ( imediatamente após o último valor já 


de REG-F na PILHA DO 


armazenado ) . 

Armazena os conteúdos de REG-A e 
SISTEMA. 

Por tanto , podemos "Salvar" na PILHA os Indicadores de 
Estado contidos em REG-F. 

Recupera o último valor armazenado na PILHA D0 SISTEMA e 
o coloca em REG-AF . 

Observe que este valor pode ter sido lá colocada a partir 
de "Outro" Par de Registradores, o que pode ser utilizado 
para "Trocar" o conteúdo de pares de Reg istr ador es . 


INDICADORES DE ESTADO <CY,Z> 
Não são alterados. 
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RET 

RET = RETURN = "RETORNE 


Estas instruções ASSENBLER são t r ansf ormadas em Instruções 
2-80 que detereminam um "Desvio" para □ endereço armazenado no 
"Topo" da PILHA DO SISTEMA (ultimo valor aí armazenado). 

A denominação de RETORNO para esta função se deve ao fato de 
que* na maioria das vezes* o endereço de desvio contido na 
PILHA foi aí colocado par uma instrução CALL, e a instrução 
RET efetua então o "Retorno ao Ponto de Chamada" (para a 
Instrução seguinte ao CALL). 

Não há* porém, correspondência obrigatória entre uma instrução 
RET e uma instrução CALL (veja rotina DESVIO do BIT-BASIC, por 
exemp lo) . 

A função da Instrução RET do 2-80 é semelhante á função da 
Instrução RETURN do BASIC. 


0010 B10: RET <#C9) 

0020 RET NZ <#CQ) 


0010 RETORNA (Desvia) para o último endereço armazenado na 
PILHA D0 SISTEMA. 

0020 DESVIA para o ultimo endereço armazenado na PILHA D0 
SISTEMA mas somente se o 11 Indicador de Estado 2 li está 
"Desligado", 

(Este indicador pode ter sido posicionado, par exemplo, 
por uma instrução de comparação anterior.) 


REGISTRADORES DE ESTADO CY,Z 
Não são afetados. 
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111 - INSTRUÇBES ASSEMBLER (RST) 


RS T 

RST = RESTART = "REINICIE" 


Estas instruções ASSEMBLER slo transformadas pelo Compilador 
em Instruções do Z— 80? cuja funcao é semelhante função das 

instruções CALL» efetuando também uma "Chamada" a um certo 
endereço de memória. 

A diferença está em que elas ocupam apenas um BYTE em 
linguagem de máquina e cada uma corresponde diretamente a 
um endereço pré-determinado (não há operando de endereço). 


0010 101: RST #10 <#D7) 

0080 108: RST #13 <#DF) 


0010 Efetua "Chamada" (CALL) ao endereço de memória #0ul0, 
"Salvando” na PILHA _DG SISTEMA o endereço de Retorno 
(endereço da Instrução 108). 

0080 Efetua "Chamada" (CALL) ao endereço de memória #0018? 
"Salvando" na PILHA D0 SISTEMA o endereço de Retorno 
(instrução seguinte à instrução RST). 


INDICADORES DE ESTADO CY,Z 
Não são afetados. 
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SBC 

SBC = SUBTRACT WITH CARRY = "SUBTRAIA COM TRANSPORTE" 

Estas Instruções ASSEMBLER são transformadas em Instruções 
Z-BO que efetuam a operação de "Subtráir" de uma Area de 
Trabalho primeiramente um Valor fornecido e, em seguida, o 
valor do Indicador de Carry-Status (0 ou 1), 

Estas instruções podem trabalhar com Pares de Registradores, 
ccmportandc neste caso valores entre #0000 e #FFFF . 

0s Indicadores de Estado são posíc ionados. 


0010 SBC A, (HL) <#9E> 

0080 SBC A,H (#90 

0030 SBC HL , DE ( #ED #5B ) 

0010 Subtrai de REG-A o valor atual do indicador CY (que pode 
ser 1 ou 0, Ligado ou Desligado), e também o valor do 
BYTE contido no endereço apontado por REG-HL. 

00a0 Subtrai de REG-A o valor atual de CY,e também o conteúdo 
de REG-H . 

0030 Subtrai de REG-HL o valor atual de CY (1 ou 0) e também 
o valor de REG-DE. 


INDICADDRES DE ESTADO CY.Z 

Resultado menor do que Zero : C,NZ 
Resultado igual a Zero : NC,Z 

Resultado maior do que Zero : NC,NZ 
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SCF 

SCF= SET CARRY-FLAG = 

“LIGUE I ND ICADOR-DE- TRANSPORTE 


Esta Instrução ASSEMBLER è transformada pelo Programa 
Compilador em uma Instrução 2-BO cuja função é “Ligar o 
Indicador de Estado CY (CARRY— FLAG 

INDICADOR-DE-TRANSPÜRTE) . 


0010 B20: SCF (#37) 

0010 "Liga" o Idicador CY (posiciona o BIT-0 de REG-F com o 
valor 1 ) . 


INDICADORES DE ESTADO CY,Z 

CY = C (Ligado) 

(0 Indicador 2 não é afetado.) 
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SUB 

SUB = 3UBTRACT - "SUBTRAIA 


Estas instruções ASSEMBLER são transformadas em Instruções 
de Máquina que solicitam ao 2- 80 a "Subtração de um vaiar do 
REG-A" 


Os Indicadores de Estado sao posicionados para refletir as 
condições do resultado. 


0010 

SUB 

#DA 

(#Dò #DA ) 

00E0 

SUB 

E 

(#93) 

0030 

SUB 

( HL> 

(#9è) 


00 !0 Subtrai 
0080 Subtrai 
0030 Subtrai 
REG-HL. 


de REG-A o valor #DA. 

de REG-A o valor contida em REG-E. 

de REG-A o valor contido no BYTE 


apontado 


por 


INDICADORES DE ESTADO CY,Z 


Resultado menor 
Resultado igual 
Resul tado ma ior 


do que Zero 
a Zero 
do que Zero 


C,NZ 
NC |Z 
NC,NZ 
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DEM A I S INSTKÜÇBES 

As demais Instruções ASSEMBLER/Z-SO sao parecidas com as já 
descritas, ou fogem aos nossos objetivos. 

Descreveremos as suas funções de maneira suscinta. 


Soma em REG-A ou em REG-HL o valor atual do Indicador CV, mais 

um segundo Valor fornecido. x v or 

0 funcionamento é semelhante ao da instrução bdL- 

Exemp los : 

0010 ADC A, D ÊttSA) 

OQEÜ ADC HL s DE íttED #5A) 


Esta instrução “Testa 11 □ valor de um 
registrador determinado ou da memóriai 
conteúdo é "0“ ou 1 - 

Os Indicadores de Estado sao posiconados 
resultados do teste. 

Exemplos : 

0010 BIT 3, D ( #CB 

0020 BIT 0,ÍHL> (#CB #A6) 


BIT escolhido* de 
verificando se o 

para refletir 


um 

seu 

os 


CF" D 

Esta I nstruçao é semelhante à Instrução CPüR, exceto que 
REG-BC nio ê "Testado". 


CF'DR 

Esta Instrução funciona de forma semelhante á instrução LPIH* 
exceto que REG-HL e REG-DE sao "Subtraídos de 1 ao nwêz de 
serem "Acrescidos de 1". 


C F‘ I 

Esta Instrução funciona de forma semelhante à Instrução lPIR* 
exceto que REG-BC nao é "Testado . 


Esta Instrução “Complementa"' o Valor do Acumulador (REG-AJi 
seja* os BITS que contiverem “0" passarão a conter 1 
vice-versa. 


Exemplo ; 

0010 CPL 


(#2F) 


ou 

e 


Esta Instrução “Converte"' o conteúdo de REG-A para o formato 
“Decimai Codificado em Binário'", 

Esta Instrução "Bloqueia Interrupções"' , ou seja* nao permite 
que a tarefa do Z-80 seja interrompida por outros 
d i sposi t ivos * 
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EI 

Esta Instrução "Permite Interrupções" * ou seja* passa a ser 
possível interromper a sequência normal de atividades do Z - 80 
para atender a dispositivos externos. 


EXX 

"Troca 11 o conteúdo dos Registradores HL» DE e BC com outras 
Areas de Trabalho denominadas H ? L 7 * D'E' e B'C' que servem 
exclusivamente para "Salvar Temporar iamente* 1 os conteúdos 
destes Registradores . 


HftLT 

Esta Instrução "Interrompe" a execução do programa corrente. 
I M 

Estas Instruções determinam o "Modo de Interrupção" que passa 
a estar ativo a partir deste momento. 


i r\io 

Esta Instrução executa um Input (Entrada) a partir de uma 
Porta de I/D para a memória* Decrementa Contador e Decrementa 
Endereço. 


I ÍMDR 

Semelhante a 

INI 

Semelhante a 

INIR 

Semelhante a 


IND, repetida até que REG-B = 0- 
INDj exceto que Incrementa Endereço. 
INI, repetida até que REG-8 = 0. 


LDD 

Esta Instruao funciona de forma semelhante â Instrução LÜDR. 
exceto que o conteúdo de REG-BC não é "Testado". 

L DOR 

Esta Instrução funciona de forma semelhante á Instrução LÜIR, 
com a diferença que REG-HL e REG-DE são "Subtraídos de 1 " ao 
ínvéz de serem "Acrescidos de 1". 


LDI 

Esta Instrução funciona de forma semelhante à Instrução LDIR, 
exceto que o conteúdo de REG-BC nao é "Testado". 

NEG 

Esta Istrucão Complementa o valor de REG-A. 

Semelhante à Instrução CPL > exceto que posiciona os Indicadores 
de Estado. 


NOP 

Este código é interpretado pelo Z-BO como "Ausência de 
Instrução" ÍNOP - NO QPERATION * Sem Operação)* e passa 
para o BYTE seguinte do programa. 
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OUTD 

Esta instrução executa um Output í Saí da í para uma 
l/üt a partir de um endereço espec if içado» decrementa 
e decrementa Endereço, 


portã de 

Contador 


OTDR 

Semelhante a OUTD, repetida até que REG-B = 0. 


RES 

Esta instrução 
pertencente a 
*tornando-Q "0". 


"Desliga" o valor de um 
um registrador determinada 


BIT escolh ido * 
□u à memória , 


Exemplos : 

0010 

0080 


RES 3 » D t#CB #9A> 
RES 0 , ( HL ) (#CB #8E) 


RL/RR 


(RL/RLA/RLC/RLCA/RLD ) 

í RR/RRA/RRC/RRCA/RRD) „ , onTAT -, 
Todas estas Instruções servem para Girar (KUIBít? 
de um Registrador ou de um BYTE da memória, isto é, 
todos os seus BITS para a Esquerda (LEFT)^ ou para 
íRÍGHT), de forma "Circular", com o "Primeiro 


o conteúdo 
“Deslocar '* 
a D i r e 1 1 a 
BIT" sendo 


sub st ituído pelo "Últi mo BIT (que sai fora ) ou pelo 811 C i 


Esta Instrução fa^ a operação "Inversa 1 à da Instrução RES, ou 
seja, "Liga" o valor de um BIT escolhido, pertencente a um 
registrador determinado ou á memória» tornando-o 1 . 


£bi / bR 


(SLA/SRA/SRL ) 

Estas Instruções servem para "Deslocar (SHlFTí para 
IRIGHT ) ou para a Esquerda (LEFT), os BITS de um 
ou de um BYTE da memória, inserindo ou nao o 
operagao- 


a Direita 
Registr ador 
BIT CV na 


III - INSTRUÇÕES ASSEHBLER 


139 


I NSTRUÇÕES ESPEC I A I 3 

Existem algumas “Instruções 11 A55EFIBLER qus servem soment 
para “Passar Informações ao Próprio Compi lador 11 , nao send 

convertidas em^Instruçoes de Máquina para □ Z-00. 

(Estas instruções podem variar de compilador para compilador.) 

ORG #7000 

Itidica ao Compilador para que as instruções seguintes 
convertidas para Linguagem Z-BO sejam colocadas a partir do 
çndereço de memória #7000* 

DEEB #3E * #FC , #00 

Indica ao Compilador para que os próximos três BYTES do 
programa compilado contendam os valores #3E,#FC e #00. 

DEFS ao 

Indica ao Compilador para "Zerar* os próximos 20 BYTES do 

programa. 

(Esta instrução é utilizada pelo BIT-BASXC para deixar BYTES 
Livres no programa.) 

DEFJ1 "Programa X" 

Indica ao Compilador para colocar a constante "Programa X" nos 
próximos BYTES compilados. 


índica ao Compilador para tratar os caracteres seguintes como 
''Cümentár io* * sem gerar qualquer "Código Objeto". 

*E 

Indica ao Compilador para "Saltar de Página" quando estiver 
listando o programa compilado. 


o to 


CAPÍTULO 


X V 


A F" É IM D I 


C F 3 
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Ol — VARXAVEIS BIOS/BASIC 


A seguir descreveremos as principais "Ar eas de Trabalho do 

BIOS e do BASIC. 

Vocl p^oderá utilizar o seu conhecimento de ASSEMBLER Z-BO para 
analisar ou mesmo modificar o conteúdo destes campos» ou para 
implementar novas funções no BIT-BASIC. 

É mostrado o endereça da Area de Trabalho na memória RAM» o seu 
nôme e o seu tamanho (número de BYTES). 


#f39A 


#F3AE 

#F3A F 
#F3B0 
#F3B 1 
#F3B3 

#F3DB 

#F3DC 

#F3DD 

#F3DE 

#F3E8 

#F3E9 

#F3EA 

#F3EB 

#F3F8 

#F3FA 

#F414 

#F41F 


#F35£ 


#F672 

#Fó74 

#FÓ7Ò 

#F6AA 

#F6AB 

#F6AD 

#F6B3 

#F6B9 


USRTAB ÍEO) 


LINL40 

U) - 

LINL32 

(lí - 

LINLEN 

(1 ) - 

CRTCNT 

( 1 > - 

A #F3DA 

< 80)- 

CLIKSW 

(1 ) - 

CSRY 

( i ) - 

CSRX 

( 1) - 

CN5DFG 

( 1) - 

TRGFLG 

( 1) - 

FORCLR 

(1) - 

BAKCLR 

( 1 ) - 

EDRCLR 

m - 

PUTPNT 

(2) - 

GETP1MT 

<2> - 

ERRFLG 

(1 ) - 

KBUF 

(318)- 

BUF 

( 258 )- 


MEtlSIZ 

(2) - 

STKT0P 

(2) - 

TXTTAB 

(2) - 

AUTFLG 

( 1 ) - 

AUTLIN 

(2) - 

AUT INC 

(2) - 

ERRLTN 

(2) - 

□NELIN 

(2) - 


BYTES utilizados para salvar os endereços 
correspondentes aos comandos DEFU3RG=&HXXXX 
a DEFUSR9=&HYYYY ídois BYTES para cada um) 
Número de BYTES da linha BASIC» no modo 
5CREEN0 

Idem» modo SCREEN1 
Idem» no modo "Atual' 1 

Número de linhas da Teia utilizadas p/BASIC 
Endereços de início das "Tabelas” para o 
VDP ídois BYTES para cada endereça) 

Indicador de "C lie" do Teclado (#00 ou #Fh ) 
Posição "Y" do CURSOR ( Ver tical i nha ) 
Posição 11 X 11 do CURSOR ( Hor i zonts 1 -Coluna ) 
Chave de "Mostra/Não Mostra" constantes 
correspondentes às Teclas de Função. 
Indicador "Botões de Tiro 14 do Joy-Stick 
Car dos caracteres na Tela 
Cor de "Fundo" da Tela 
Cor da "Borda" da Tela 

Endereço "ATÉ" dos caracteres no KEY-fíUFFER 
Endereço "DE" dos caracteres no KEY-BUFT ER 
“Número do Erro" encontrado pelo BIOS/BASIC 
(variável ERR do BASIC) 

11 CRUNCH BUFFER" "AREA DE TRABALHO PARA 
TRITURAÇSü" - Area para Montar /Desmontar os 
comandos processados 

"BUFFER BASIC" - Are a de Trabalho onde a 
Linha digitada pelo usuário é colocada pela 
rotina PINLIN, antes de ser processada 
pelo BASIC 

Posição "Mais Alta" da Memória 
Endereço de início da PILHA DO SISTEMA 
Endereço de início do "TEX10 BASIC (início 
do Programa BASIC ) 

I nd 1 ca se o modo AUTO do BAS I C está ou nào 
“Ativo 11 (#00 ou #FF ) 

Número da Linha Inserida pelo AUTO 
Incremento do comando AUTO 

Número da Linha onde ocorreu o Erra 
(Variável ERL do BASIC) 

Número da Linha p ara executar em casa de 
Erro (atualizado por ONERRGRGÜTO do BASIC) 


IV 
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#F6Ca 

VARTAB 

< 2 ) - 

#F6CA 

ARYTAB 

(2) - 

#FiCó 

STREND 

(3) - 

#F6C8 

&ATPTR 

<2> - 


#F7C4 

TRCFLG 

m - 

#F^87F 

FNKSTR 

( lóOí- 

#FBF0 

KEYBUF 

Í40) - 

#FCA8 

BOTTOM 

(P> - 

#FC4A 

Hl «EM 

í B) - 

#FCA8 

INSFLG 

u> - 

«FCA9 

CSRSW 

U) - 

#FCAA 

CSTYLE 

(1) - 


Endereço de início da Area de Variáveis 
Simples do BASIC 

Endereço de início da lábela de Array 
Fim da memória em uso pelo BASIC 
"Pointer" (Apontador) para o DADO (DATA) 
seguinte a ser lido por um comando READ 
(atualizado por um comando RESTDRE) 
Atualizada pelo comando TRON (Trace) 

Dez áreas de ló BYTES cada uma ande 
são guardadas as constantes das Teclas de 
Função (PFKEYS > 

4rea de Trabalho (BUFFER) do Teclado 
Início da RAM utilizada pelo BASIC (#8001) 
Final da RAM disponível para o BASIC 
Indicador de modo IMS "Ligado/Desl igado" 
Chave para mostrar ou não a CURSOR 
Estilo do CURSOR 


m w - PONTOS DE ENTRADA BIOS/BASIC 

OS - PONTOS DE ENTRADA BIOS/BASIC 

#0010 OUTDQ “ 


ft seguir «strareaos os endereços de início (Pontos 
de Entrada) para diversas rotinas do BIOS/BASIC. a 
função de cada una; as condições de entrada ÍENTÍ, 
as condições de saída (SAI í e as áreas de trabalho 
por elas utilizadas/eodificadas (ICO). 

Al gutas destas rotinas sao utilizadas pelo 
BIT-BflSIC íe detalhadas durante a descrido 
deste prograta), 

te? poderá utilizar estas rotinas et seus 
prograsas ASSEHBLffl ou para incluir novas funções 
no 81T-BA5EC, 


*0000 BKFAM — — — 

Verifica RAR e posiciona SL0TS (Inicialização) 

#0004 CGTABL 

Endereço da Tabela do Gerador de Caracteres 

jtOCOA VDP.DR 

Endereça Registrador VHP (leitura) 

*0007 VDP.DH — — 

Endereço Registrador VDP (Gravação) 

#0008 SVNCHft — 

Verifica se Caráter do cosando è válido - Se si«. 
desvia para CHRGTR, se não, Erro de Sintaxe 
ENT * K.=Endereço do caráter 
SAI - A =C6digo do caráter 

Üíndereço príxiao caráter 
CY=1 se caráter nuflérico 
Z =1 se fii do cosando 

— #0000 RDSLT — — 

Seleciona SLOT (Banco (tetória ROR/RAN). 1? BYTE 
ENT - A ^Seleciona SLOT (FmSSPP) 

F = 1 significa que SS foi especificado 
SS - Núlero SLOT secundário 
PP = Núsero SLOT prisário 
ILíndereço de saána a ser lido 
SAI - A íonteddo do endereço de «estria lido 
HDD - AF.BCiBE (Interrupções Desabilitadas! 

— *0010 Mfiffl 

L? príxi« caráter do TEITD BASIC 
ENT - üíndereço caráter a ser lido 
SAI - A =Caráter lido 

HL=Endereço prònso caráter 
CY=Í se □ caráter é nuaérico 
Z =1 se fis do Texto (100) 

— 1001* MRSLT — — 

Seleciona SLOT (Banco de Naòna) e grava BYTE 
ENT - A =Seleciona SLOT (FxxxSSPP) 

F = 1 significa que S5 foi especificado 
SS = Núserc &DT secundário 
fP = Núaero SLOT priaár io 
Hl Endereço de anória a ser gravado 
E -BYTE a ser gravado 

(CD - AF,BC,BE (Interrupções Desabilitadas) 


Saída de ua BYTE para o 'Dispositivo Corrente" 

ENT - A =BYTE a ser remetido p/saida 
PTRFIL ÍSFBàA) 

PTRFl£ (IF416) 

I001C CALSLT 

Chaaada (CflLLI entre SLOTS 
ENT - IY=Seleciona SLOT (FmSSPP) 

F=1 significa que SS foi especificado 
SS = Mísero 5.0T secundário 
PP = Mísero 3 lDT pri«ário 
IX=Endereço a ser chasado 
SAI - lndeter»inado 

HDD - Indeterainado (Interrupções Desabilitadasi 

#002) DCONPfi 

Compara RHHt coca REME 
ENT - tí.=ftialquer conteido 
Eíualquer ccntaído 
SAI - C.iE - DE>HL 
NC,Z - DE=HL 
NC,NZ - EEÍti 

---- #0024 ENAS-T — 

Habilita (Ativa) SLOT 

ENT - A =Se!eciona SLOT (FxxxSSPP) 

F=1 significa que SS foi especificado 
Si = NÓiterc SLOT secundário 
PP = Néeero S.0T priiário 
Üíndereço de «etária 

MOD - Todos Registradores (Interrupções Desabilitadas) 

— #0028 GETYFft — 

Fornece o tipo de FAC 

ENT - FAC 

SAI - Indicadores "Registrador F 

#002B VERftSX 

Cinco BYTES onde está ariazenado o 'Mísero de 
Versão' do MSI ípnteira versão contét Zeros), 

#0030 CALLF — 

Efetua chaMda (CALL) entre 3_0T ’ S 

ENT - Instrução ASSEfflLER = tf7 *SS SE #EE 
#F7 = RST #30 fCALL 10030) 

ISS = Mísero do SLOT 
t FPFF = Endereço a ser chatado 
SAI - Indeterainado 
(CD - Indeterainado 

«038 KEYINT 

Executa procediientos de Interrupção de Hardware 


AS ROTINAS 5E6UINTES SSO UTILIZADAS PARA 
INICIALIZAÇÃO BE 1/0 

« 03 B nano — 

Executa inicialização dos dispositivos 
HDD - Iodos 

#C 03 £ ÍMFtK ; 

Inicializa conteddo Teclas de Função IPFKEYS) 

“OD - Todos 
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AS ROTINAS SEEUINTES 5S0 UTILIZADAS P SB ACESSAR 0 
VHP (VÍDEO DiSFJY PRGCESSS - PROCESSADOR DE TELA) 

ÍOOAi DISSCR 

Desabilita TeU (não aostra leages) 

TO - ff, BC 

*0044 ENASOfr— 

Habilita Tela (eostra isages) 

TO - AF.BC 

*0047 HRTVDP 

Grava ua BYTE nu* Registrador do VDP 
ENT - C =Núwro do Registrador 

B =Dado a ser gravado 
TO - AF,BC 

I004A RDVRPf 

Le un BYTE da VRAM 

BIT - (t=Endereço da Wfifl a ser obtido 

SAI - A =BYTE da VRAM 

TO - AF 

#W4D «RTVRM — 

Grava i'® BYTE na VRAM 

ENT - TOEndereço da IRAM 

A -BYTE a ser qravado 

TO - AF 

80050 5ETKD - ■ ■ ■ ■ ■ ■ - - 

Posiciona VHP nara Leitura 
ENT - HL 

MQD - AF 

™ #0053 5ETWST — 

Posiciona VDP para Gravação 
ENT - H 

TO - !f 

*0056 FILVRH - 

Preenche u® trecho da 'VRAM coai u* BYTE 
detemnado 

ENT - HL=Endereço inicial 

BC=Ta#anho da área a ser preenchida 
A =BYTE a ser «ovido 
MOD - Todos 

*005? LDIRftV 

Coeis us bioco da «suína VRAM para nesória RAM 
ENT - H=Endereço inicial VRAM 

DE=Endereçc inicial RAM 

9C=Ta®anho do Bloco a ser copiado 

TO - Todos 

foo5c lDIRVM — 

Copia u« bloco da RAM para a VRAM 

ENT - It^Endereco inicial RAM 

DE=€nderego inicial VRAM 

8>Tamaniic do Eiioco a ser cornado 

TO - Todos 

I005F CHBMOt - 

Posiciona o «odo de operação do VHP 

ENT - Conteúdo Area de Trabalho SEM® tIFCAf) 

TO - Todos 


— #0063 QCCLfi — 

Muda cores da TeU 

ENT - FtTCUfcÍQr dos caracteres na Tela itF3E?) 
9AKCLfi=€or de Fundo da TeU UF3EA) 
9®RCLR=Cor da Borda da TeU (IF3EB! 

HDD * Todos 

jOfcè »I _ — — 

Procediientos de "Interrupção nãi Mascarivel* 

*<Xtó? CLRSPR - 

Inicializa todos os SPRITE5 (Padrão Zeros) 
noaesi cor das letras, posição vertical 3091 
ENT - SCRHDD=SOi£BHTOE (Modo da TeU - IFCAF? 
HDD -Todos 


PARA AS ENTRADAS SEGUINTES VALEM AS CÜNVENÇSES 
TH - Modo TEXTÜ rSCREE* - 40X341 

T33 = Modo TEtTO (SCREEN1 - 33X34) 

W = fedo ALTA RESOLUÇÃO (SCREN3I 
TO = Modo MULTICOR (SCREEN31 

NAM = Tabela de News (Caracteres) 

CSF = Tabela de Padrões 

CQL = Tabela de Cores 

ATR = Tabela de Atributos de SPRITES 

PAT = Tabela de Padrões de SPRITES 

toote fflinr 

Inicializa TeU para iodo TEXTO (SCREENOÍ 
ENT - TXTNAN <*F3S3UTTICSP ÍIF3B7) 

TO - Todos 

*006F ÍNIT33 

Inicializa TeU para aodo TEXTO íSOÍEENl) 

ENT - T32NAN UF3BD), T3ECSP ÍÍF3C1), 

T33C0L ÍOF). T3EATR (IF3C3), T$PAT IIF3C5Í 
MOD - Todos 

- #0073 1NIGRP ■ - — 

Inicializa Tela para «da ALTA RESOLUÇSO ISCREEN3! 
ENT - GRPNAM (IF3C7). GRFÍGP ÍIF3CB), 

GRPCGL (IF3C9), BRPATR (IF3ED), SRTPAT ÍIFSCFi 
TO - Todos 

10075 INITO 

Inicializa TeU para aodo MULTICOR ÍSCREEN3) 

ENT - TONAM (IFUDt), TOCGP UF3D5), 

HTCOL (031. ItTATR 107), TOPAI (*F3D9> 

MOD - Todos 

«OTO ÍTTXT 

Posiciona VDP para iodo TEXTO (SCREENOÍ 
ENT - TXTNAM, TXTCEP 

TO - Todos 

- I007B SETT33 

Posiciona VDP para wdo TEXTO (SCREENl) 

ENT - T33NAK. T33C3P. T33C0L. T32ATR, ^SPPAT 

MOD - Todos 

- _ — .. . „ — ^ijTf 50BRF — • - - 

Posiciona VDP para ®odo ALTA RESEXUÇSü (SCREEN31 
ENT - SRFNAM. SiPCÊF. GRPCOL . SÍPATR, GRFPAT 

MOD - Todos 


1Ú6 
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tonei SOltT 

Posiciona VHP para ocdo HJLTICQR (SCREBE) 

EXT - ÍLTWfl. ítTESP, NTCOL. ílTATB, NTPAT 
MD -Todos 

vm CALPAT 

Fornece endereço da Tabela de Padrões de 5PRÍTE 
ENT - A identificação (Núnero) do SPRITE 
SAI - N=Enfereeo da Tabela de Padrões 

NB - AF,DE,N 

tOfiff? CALATR — — 

Fornece erdereço Tabela de Atributos de STiiTE 
arr - A identificação (Ntero) dc SPftlTE 
Sfll - Nindereço da Tabela de Atributos 

HOD - AF,SE»KL 

— «m egsiz ■ 

Fornece Taaarbo atual dos SUITES 

8»T - Nada 

SAI -A iaaanho dos SUITES (Núsero de PITES) 
CYi Se SUITES 16*16 
HDD - AF 

— 100® ERPPRT 

Coloca caráter na Tela Gráfica 

ETíT - A íaráter a ser apresentado 


AS ENTRADAS SEBUIHTES SJO UTIUZABAG PARA ACESSAR 0 
PSE (PROGRífflABLE SIM) &NRATDR - BSDCR DE SONS 
mQffiíitóB.) 

10090 BICINI — 

Inicializa PSG para PLAY 
HDD - Todos 

— 10093 BfTFSG - — 

Envia o* dado para ua Registrador do P95 

ENT - A =Nú*ero do ftegistrador 
E =Dado a ser enviado 

— K509i REFSb 

Lã dado de ua Registrador do PS 

ENT - A =Nóaera do Registrador 
SAI - A =Dado S ido do P93 

10099 SffiTXS — 

Executa atividade “de fundo* para o fl-AY 
HOD - Todos 


AS ENTRADAS SESUINTE5 3&Q UTILIZADAS PARA ACESSAR 
0 TECLADO, TELA E IMPRESSORA 

AO09C DSE 

Verifica o BUFFDi do Teclado 

SAI - Z = t (Z) Se há algun caráter no HFFER 

HDD - AF 

VXfíf CHGET — 

Aguarda até que ua caráter seja digitado 
fornecendo o seu código, 

SAI - A =C6oino do caráter digitado no teclado 
HDD -AF 

mme QfUT -- — — — 

Envia ui caráter nara a Tela 

ENT - A Caráter a ser apresentado na Tela 


I00A5 LPTOUT 

Envia ua caráter para a I»ressora 
ENT -A ^Caráter a ser enviado 

CYi (C) se não houve sucesso 


HDD -f 

tOOAS LPTSTT 

Verifica estado da íapressora 
SAI - ÍHFF e 2=0 ÍIG! se a íapressora Pronta 
A=#00 e Z=1 íZ) se íapressora NÍO "Pronta 11 
HDD - AF 

tOOAB QM3fi 

Verifica BYTE controle gráfico e converte código 
ENT - A ^Caráter 

SAI - fC-BYTE de controle gráfica 

C T Z=C6digo gráfico convertido 
C,HZ=Código não convertido 
HDD - AF 

tOÔAE PININ 

ilté* linha digitada via Teclado, até o 
acionasento da Tecia RETURN ou CtMROL+STOP. 

Coloca linha digitada no HFFER (IF55E), 

SAI - H=Endereço do RFFER menos 1 ÍIF35D) 

CYi (C) CONTROL-STÍF pressionadas 
HDD - Todos 

H0B1 IM-IN 

idea PININ, enceto quando «odo AUTO ativo 

— — lOOBA QININ 

Coloca ■’* na Tela e desvia para ININ 

WKJB7 BfiEAKI " 

\terifica se as teclas CDNTRffl.+STQP estac 
pressionadas 

SAI - CYi !C) se CONTROL+STOP estão pressionadas 

H® - AF 

tOOBA ISCNTC 

Verifica teclas SHIFT-5TIF 

#Ú08D EXCKTC - Idea ISOÍTC, usada pelo BASIC 

— I00C0 ESP 

Enite ua só* de ‘Alarae* ÍBIPÍ 
M® - Todos 

I00C3 OS 


Tiapa' a Tela 
HDD -AF.BC.DE 

I00C6 POSIT 

Coloca o CURSOR e# uaa posição escolhida da Tela 
ENT - H üluna (Horizontal) 

L iirha (Vertical) 

HDD -AF 


— I00C9 FNKSB 

Hostra o conteúdo da Teclas de Função na Tela 
(PFKEYS), se indicador ‘Ligado (FbKFLtrlFBCE) 

— . bvrr nanar 


“Apaga* Teclas de Função I PFKEYS' 

HDD - Todos 

IOOCF D6PFW — 

Mostra Teclas de Função na Tela (PFKEYS) 


rOO - Todos 




IV - PONTOS DE ENTRADA BIOS/OASIC 


l*i? 


tooDE TOTEXT 

Força a leia para o modo TEXTO 
TO - Todos 


AS ENTRADAS 5EBUINTES 520 UTILIZADAS PAPA 

ACESSAR DS PERIFÉRICOS K JGSOS 

~ — -- — mm ststdí — — — 

Devolve o Estado corrente da JOY-STICK 
ENT -A -Identificado do JOY-STICK 

SAI - A -Direção atual do JOY-STICK 

íffl - Todos 

I00D9 6TTRI6 — - — 

Devolve o estado corrente da “Botão de Tiro* 

ENT - A -Identificação do Botão de Tiro 

SAI - A =#00 indica botão H Nao pressionado" 

A -#FF indica botão "Pressionado" 

— tOQDB BTPffl 

Devolve o Estado corrente do PADDLE 
ENT - A -Identificação do PADDLE 

SAI - A -Estada atual do PADDLE 

TO - Todos 

m $z ETPDL — 

Devolve o vaiar corrente do PADDLE 
ENT - A -Identificação PADDLE 

SAI - A -Valor atual do PADDLE 

rCD - Todos 


AS ENTRADAS SEGUINTES S20 UTILIZADAS PARA ACESSAR 
0 GRAVADOR 

— — IG0E1 TAPIHN - 


Liça motor do gravador e II "Cabeça lho" da fita 
SAI - CY-1 (Cl se não houve sucesso 

HDD - Todos 


#0íB TAPIN 


L? o® BYTE da fita 
SAI - A -BYTE lido 

CY-Í (0 leitura interrompida 

— 1 ---- #00t? TflPIOF 

Encerra leitura da fita 
tOOEA TAPGGN - 


Liga motor do gravador e grava “Cabeçalho" 
ENT - A =0 Se cabeçalho "Curto* desejado 
AOO Se cabeçalho "Longo* desejado 
SAI - CY-1 ft) se gravação interrompida 

HDD - Todos 

— — #00ED TftPOÜT — 

Grava \m BYTE na fita 

EN T - A -BYTE a ser gravada 

SAI - CY-1 tCí se gravação interrompida 

TO - Todos 


- — mo TAPÍ50F — 

Encerra a gravação da fita 

__ mi STüGTR — — — 

Liga/Desliga o motor do gravador 
ENT - A =#00 Para desligar □ motor 
A =#01 Para ligar o motor 
A -IP55 Para inverter o estado do iotor 


AS ENTRADAS SEGUINTES S2G PARA TRATAMENTO PE FILAS 

ím — — — ^ 

Retoma quantos BYTES existem na fila 

jfOOF? FLFT9 

Coloca ui BYTE na fila 


AS ENTRADAS SEGUINTES S£ü UTILIZADAS PELAS 
ROTINAS DE TRATAMENTO DE TELA GRAFICA ÍEENGRP p 

m grpí 

— fOOFC RIEHTC — — 

tfave um PIXEL nara a direita 

#OOFF LEFTC — 

Move m PIXEL para a esquerda 

#0108 UPC — 

Nove m PIXEL para cisa 

TljPC 

Move üí PIÍEL para cima 

— #0109 DMC 

Move m PIXEL para baiiío 

— W108 TOTUNC — 

Move uni PI XEL para baixo 

#010£ SCALXY 

Coordenadas das Escalas X e Y 

#0111 HAPXYC 

Mapeia coordenadas X/Y para o endereço físico 

— # om Ffjoc 

Carrega endereço físico atual e padrão máscara 
SAI - HL -Endereço físico 
A -Padrão de Máscara 

lOi n giDREE — — — 

Armazena endereço físico e padrão de máscara 
ENT * HL=Endereço físico 

A -Padrão de Máscara 

— * #011 A SETATR — — 

Posiciona o BYTE de atributo 

— #01 1D READC — 

LI atributos do PIXEL corrente 

— #0180 SETC — 

Seta PIXEL corrente com atributo fornecido 

_ ttte3 fg£TP( 

Posiciona PIXELS horizontal sente 

— - - - - - #0126 GTAÍH) 

Retorna “Razão de Aspecto" 

SAÍ - EEjHL 

#0129 p^iNI * 

Inicialização para PA INI 

#0tEC SCANR 

Pesquisa PIXELS para a direita 

— - # 01 £F sim — — — 

Pesquisa PIXELS para a esquerda 


AS ENTRADAS SEGUINTES EXECUTAM FUNÇSES DE USO GEPAL 

10132 CHGCAF 

Muda estado da lâmpada CAPS-LQCK (Liga/Desliga) 

ENT * A -tOO Para apagar a lâmpada 

AOIOú Para acender a lâmpada 
MÜD -flF 


J 


1AB 


IV - PONTOS DE ENTRADA BIOS/BASIC 


10135 CHS5NE — — 

Sjda o estado de BIT de som 
ENT -A =100 Para desligar o BIT de sca 
AO 100 Para ligar a BIT de soa 
WD * flF 

— #0133 RSJEG — — 7~— 

Retorna BYTE corrente enviado ao 3.DT priaárro 
3AI - A =BYTE lido 

K013B H5UEB ; 

Srava BYTE no registrador dn 3.ÍJT pri Bário 
ENT - Ã -BYTE a ser gravado 

tOtl fUMF 

l? registrador de Estado do VHP 
SAI - Konteúdo do Registrador 

m - AF 

tOlAl SNSflfiT 

Retorna estado una Tila* da Matriz do Teclado 
ENT - Ã =Ntkero da Linha 

SAI - A =BITS *0' corresponde» Teclas acionadas 

MOB - AF 

tom PHYDIO ■- 

[ter ações para dispositivos de arnazenasento 

B14? qjíHAT 

Inicialização dispositivos de anazenanento 

#01 W ISFLTD ; 

Verifica se está sendo executada operação de LO 
fflD - AF 

#01AD DtTTDLP 

Envia u» caráter cara a Impressora 

ENT - A =BYTE a ser enviado 

HDD - E 

NOTAS - Esta rotina difere de LPTOUT (t00A5* no 
seguinte 

1 -TAB's são convertidos e» espaços 
B-HIRA 6 ANA e Sí «tolos Gráficos são convertidos 
quando a impressora nao é MSX 
3 -ãiando a i «pressão è* interrospida, é 
apresentada a («ensaoes de "ERRO DE 1/0" 

10150 aETVCP — ; 

Rotina nara execuplo de iásica "de Fundo 1 

10153 GETVCP --7 ; 

Rotina para execucão de lüsica "de Fundo" 

(0154 kILBUF 

"Limpa" BtFFER do Teclado 
MDD - HL 

#0159 CALBAB — 

Executa Inter-SLDT CALL’s mter namente ao BASIC 
ENT - IÍ=Endereço 

SAI - Indeterminado 

NOS - Indeterminado 


A SEGUIR EXISTEM 90 BYTES RESERVADOS PARA 0 BIOS 
(VOCÊ NM PODE UTTtIZROS POIS PERTENCEM b ROM) 


IV - GANCHOS DO BI OS/ BASIC 


1A9 


03 — BANCHOS B I ÜS/BASIC 

No ítem I -02 você tem uma descrição do funcionamento e 
utilidade dos GANCHOS do MSX. 

Neste Apêndice relacionamos os endereços dos GANCHOS chamados 
pelas diversas rotinas do BIQS/BASIC. 

0 programa BIT-BASIC utiliza alguns destes GANCHOS Para 
“Interceptar" e introduzir modif icaçoes funcionais nas rotinas 
corresondentes. 

Voc? também pode montar programas ASSEMBLER tou mesmo programas 
BASIC) para utilizar estes GANCHOS. 


Cada GANCHO ocupa CINCO BYTES e serão mostrados o seu Endereço 
Inicial) o nome da rotina do BIOS/BASIC que efetua desvio para 
este endereço e o endereço da Instrução CALL que faz este 
desvio (entre parêntesis). 

Vãrias destas rotinas estão descritas no apêndice 08 (Pontos de 
Entrada BIOS/BASIC). 


#FP9A KEYI 
#FD9F TIMI 
#FDAA CHPU 
#FDA9 DSPC 
#FDAE ERAC 
#FDB3 DSPF 
#FDBB ERAF 
#FDBD TOTE 
#FDC8 CHGE 
#FDC7 INIR 
#FDCC KEYC 
#FDD1 KEYA 
#FDDó NMI 
#FDDB PINL 
#FDEO QINL 
#FDE5 INL I 
#FDEA ONGO 
#FDEF D5KD 
#FDFA SETS 
#FDF9 NANE 
#FDFE KILL 
#FE03 IPL 
#FE08 COPY 
#FEOD CMD 
#FE12 DSKF 
#FE17 DSKI 
fFElC ATTR 
#FE21 LSET 
#FE2i RSET 
#FEEB FIEL 
#FE30 MK I $ 
#FE35 MKS* 
#FE3A MKD* 
#FE3F CVI 
#FEA4 CVS 
#FEA9 CVD 


(#00C4> 
< #00531 
( #OBCO) 
(#09E6) 
(#0A33) 
<#0B2B) 
(#0B15) 

(#10CE) 
<#071E) 
(#1025) 
<#OF10) 
(#1398) 
(#23BF) 
í#23CC) 
( #23D5) 
(#7810) 
(#7C16) 
( #7C1B) 
( #7C20) 
( #7C25) 
( #7C2A) 
( #7C2F) 
(#7C3A) 
( #7C39) 
( #7C3E) 
<#7Cé3) 
( #7C48) 
i#7C4D) 
(#7C5P) 
<#7C57) 
í #7C5C ) 
l#7C61) 
<#7C66) 
( #7C6B) 
( #7C70) 


Tratamento de Interrupções 
Tratamento de Interrupções 
CHPUT (Envia um caráter para a Tela» 

DSPCSR (Mostra o CURSOR) 

ERACSR (Apaga □ CURSOR) 

DSPFNK (Mostra PFKEYS) 

ERAFNK (Apaga PFKEYS) 

TOTEXT (Força Tela para modo TEXTO) 

CHGET (Input caráter) 

INIPAT (Inicializa Padrão Caracteres VRAM) 
KEYCOD (Codificador do Teclado) 

KEYEASY (Tecla Fácil) 

NMI (Interrupção Não Mascarável) 

PINLIN (Obtém linha digitada) 

QINL I N ("Interrogação" mais PINLIN) 

INL IN (PINLIN mais AUTO) 

ONGOTP (ON GO TO) 

DSKOÍ (Gravação Bloco em Diskette) 

SETS (Posiciona Atributos Diskette) 

NAME (Rotina RENAME para Diskette) 

KILL (Rotina "Apaga Arquivo" Diskette) 

IPL (Carrega Progr . Inicial p/Diskette) 
COPY (Copia arquivos Diskette) 

CMD (Rotina CGMMAND p/Diskette) 

DSKF (Rotina Disco Livre p/Disketteí 
DSKIÍ (Lê Bloco Diskette) 

ATTR$ (Rotina de Atributas p/Diskette) 
LSET (Posiciona Esquerda - Diskette) 

RSET (Posiciona Direita - Diskette) 

^ÍELD (Potina CAMPO p/Diskette) 

MKI$ (Conversão caracteres p/Diskette) 

MKS4 (Conversão caracteres p/Diskette) 

MKDÍ (Conversão caracteres p/Diskette) 

CVI (Conversão caracteres p/Diskette) 

CVS (Conversão caracteres p/Diskette) 

CVD (Conversão caracteres p/Diskette) 


lbü 


IV - GANCHOS 00 BÍÜS/BASll 


#FE4E 

GETP 

( #6A93 ) 

GETPTR 

#FE53 

SFTF 

í #6AB3 ) 

SETFIL 

#FE5B 

NOFO 

<#6AF6> 

NOFOR 

#FE5D 

NULO 

( #6B0F ) 

NULDPN 

#FE62 'NTFL 

( #693B) 

NTFLO 

#FE67 

MERG 

(#6363) 

MERGE 

#FE6C 

SAVE 

! #6BA6) 

SAVE 

#FE71 

BINS 

(#6BCE) 

BINSAV 

#FE76 

BINL 

(#6BD4) 

BINLOD 

#FE7B 

FILE 

( #6CEF ) 

FILES 

fFEBO 

DGET 

( #6C3B) 

DGET 

#FE85 

FILO 

(#òC51) 

FIL0U1 

#FE8A 

I NDS 

(#6C79) 

INDSKC 

#FE0F 

RSLF 

( #6CD8) 


#F£94 

SAVD 

( #6D03> 


#FE99 

LOC 

( #6D0F ) 

LDC 

#FE9E 

LOF 

( #6DE0 ) 

LDF 

#FEA3 

EOF 

( #6D33) 

EOF 

#FEA8 

FPOS 

( #6D43> 

FPDS 

#FEAD 

BAKU 

(#ÓE36) 

BAKUPT 

#FEB2 

PARD 

( #6F 15 ) 

PARDEV 

#FEB7 

NODE 

( #6F33) 

NODEVN 

#FEBC 

POSD 

( #6F37) 

POSDSK 

#FEC1 

DEVN 

Sem Uso 

DEVNAM 

#FEC6 

GEND 

(#6F8F) 

GENDSP 

#FECB 

RUNC 

(#6E9A) 

FUNC 

#FED0 

CLEA 

(#62A1 ) 

CLEARC 

#FED5 

LOPD 

Í#6£AF) 

lopdft 

#FEDA 

STKE 

<#6EF0) 

STKERR 

#FEDF 

ISFL 

( #145F) 

1SFLI0 

#FEE4 

OUTD 

( #1B46> 

OUTDO 

#FEE9 

CRDO 

( #73E8) 

CRDO 

#FEEE 

DSKC 

< #7374) 

DSKCHÍ 

#FEF3 

DOGR 

(#5930 

DOGRPH 

#FEFB 

PRGE 

(#4039) 

PRGEND 

#FEFD 

ERRP 

(#40DC) 

ERRPRT 

#FF02 

ERRF 

(#40FD) 


#FF07 

READ 

( #4128) 

READV 

#FF0C 

flAIN 

(#4134) 

MAIN 

#FF11 

DIRD 

( #4 1A8) 

D1RD0 

#FF16 

FINI 

(#4237) 


#FF1B 

FINE 

(#4247) 


#FFE0 

CRUN 

(#42B9) 


#FF25 

CRUS 

(#4353) 


#FF2A 

ISRE 

(#4370 


#FF2F 

NTFN 

( #43A4) 


#FF34 

NOTR 

< #44EB ) 


#FF39 

SNGF 

(#4501 > 


#FF3E 

NEWS 

(#4601 ) 


#FF43 

GGNE 

(#4646) 


#FF4B 

CHRG 

(#4666) 


#FF4D 

RETU 

(#4821) 


#FF52 

PRTF 

( #4A5E ) 


#FFS7 

COMP 

(#4A94) 


#FF5C 

FINP 

( #4AFF) 



(Apontador Arquivo p/Diskette) 
(Posiciona Apontador Arquivo! 
(Cláusula NO FOR p/Diskette) 

(OPEN NULL p/Arquivo Diskette) 

(NOT FILE 0 p/Diskette) 

(MERGE Arquivos Diskette) 

(SAVE Arquivos Diskette) 

(BSAVE Arquivos Diskette) 

(BLOAD Arquivo Diskette) 

(FILES - ARQUIVOS Diskette) 

(GET p/Diskette) 

(FILE OUT 1 p/Diskette) 

(Lê Caráter Diskette) 

(Redireciona Drive Antigo Diskette) 
(Salva Driye Corrente Diskette) 
(Localização Arquivo Diskette) 
(Tamanho Arquivo Diskette) 

(Fim Arquivo Diskette) 

(Posição Arquivo Diskette) 

(BACK UP - COPIA Arquivo Diskette) 
(Verifica Nome Periférico) 

(Nome Padrão Periférico) 

(Rotina POSSIBLV DISK) 

(Nome do Dispositivo! 

(Acionador Geral de Dispositivos) 
(Rotina RUN CLEAR ) 

(Rotina CLEAR) 

(Posiciona Variáveis Padráo) 

(Erro de STACK - PILHA) 

( 1/0 Arquivo IS) 

(Rotina OUTDO - Saída caráter) 
(RETURN + LINE-FEED) 

(Entrada caráter Diskette) 

(Rotina Gráfica) 

(Fim de Programa) 

(Saída de Erros) 

(Idem) 

(Rotina "Pronto" - ÜK) 

(Entrada PRINCIPAL do BASIC) 
(Executa COMANDG DIREI ü) 

(Fim Entrada Principal) 

( Idem ) 

(Codif ica/Decod 1 1 íca Linha) 

( Idem) 

( Idem) 

( Idem ) 

(Idem) 

(Instrução FOR) 

(Nova Instrução) 

(Rotina CHRGTR) 

(RETURN) 

(PRINT) 

(PRINT) 

(PRINT) 


IV - GANCHOS DO BTOS/BASIC 


151 


#FF61 TRÍ1N 
#FF66 FRME 
#FF6B NTPL 
#FF70 EVAL 
#FF75 OKNO 
#FF7A FING 
#FF7F ISÍ1I 
#FFB4 WIDT 
#FFB9 LIST 
#FFBE BUFL 
#FJ*93 FRQI 
#FF9B SCNE 
#FF9D FRET 
#FFAE PTRG 
#FFA7 PHYD 
*FFAC FORM 
#FF81 ERRO 
#FFB6 LPTO 
#FEBB LPTS 
#FFCO SCRE 
#FFC5 PLAY 


( #4B4D ) 

(#4CóD> 

(#4CA6) 

( #4DD?) 

<#4F2C) 

( #4F3E ) 

(#51C3> ISMID* 
Í#5ICC) WIDTH 
( #522E ) LIST 
í #532D) BUFLIN 
(#543F) FRDINT 
(#5514) 


(Erra READ ou INPUT) 
(Analisador Expressões) 

( Idem) 

( Ana I í sador Fatores ) 
i Idem) 

( Idem ) 
miD$) 

(Largura linhas Tela) 

(LIST programa BASIC) 
(Rotina BUFFER LI NE) 
(Conversão In te iro 3 
(Apontador Número de Linha) 


( #67EE) FRETEM P (Rotina FREE ÜP TEIIPORARIES) 
(#5EA9) PTRGET (Rotina POINTER 6ET) 

(#140A) PHYD 10 (1/0 Físico Diskettes) 

(#140E) FORMAT (Formata Diskettes) 

<#A06F) ERROR (Tratamento de Erros) 

(#0850) LPTOUT (Envia Caráter p/ Impressora) 
(#0884) LPTSTT (Verifica Estado Impressora) 
Í#79CC) SCREEN (Entrada comando SCREEN) 


(#73E5) PLAY (Entrada comando PLAY) 


#FFCA até #FFFE 


Área não utilizada peio 8I0S/BA5IC 


i5a 


PROGRAMA R1T-BA31C COMPILADO 


iv - 

0*+ — PROGRAMA BIT-BASIC COMP I LADO 


FFD9 


10 

ÜRG 

#TFD9 



£0 ; 



FFD9 

Cl 

30 DESVIO: 

POP 

BC 

FFDfi 

asm 

40 

CALL 

IH3CH 

FFDB 

DB 

50 

RET 

C 

FFDE 

E5 

60 

FliSH 

Hl 

FFDF 

1)7 

70 

RST 

#10 

FEÜ 

21F5FF 

80 

LD 

HLDW9 

FFE3 

010400 

% 

LD 

BCi#04 

FFE6 

A7 

[00 

AND 

A 

FFE7 

EDB1 

no 

CFIR 


XE9 

El 

ião 

PÜP 

Hl 

FFEA 

CO 

130 

RET 

NZ 

f FEB 

Cí 

140 DV01; 

PDF 

BC 

FFEC 

010070 

150 

LD 

Ki INICIO 

FFEF 

Cj 

160 

FLISH 

BC 

FFFO 

3EFC 

170 DV0£: 

Li) 

A,ftFC 

FF2 

D3A8 

180 DW3: 

GUI 

m), a 

FFF9 

C9 

190 

RET 


FFF5 

3C5B3DcE 

EOO DV09: 

BEF6 

#3C,#5B t #3D,#aE 



aio ; 



7tKM) 


aao 

ORS 

17000 



830 ; 



im 

3h477B 

240 INICIO; 

LD 

MTW) 

7003 

FEC3 

aso 

CP 

#C3 

7005 

CAC477 

260 

JF 

z.Qioa 

7008 

£5 

870 

PL6H 

1 Hl 

7009 

CD5B70 

£80 mu 

CALL 

. RST10 

7MC 

€07370 

m 

CALL 

. hinusc 

7Í30F 

77 

300 

LD 

(HL) t A 

7010 

FEOO 

310 

CP 

#00 

701 B 

P0F5 

320 

JR 

HLM\ 

7019 

El 

330 

POP 

d 

7015 

€09370 

340 

CALL RST10 

7018 

FE3C 

350 

CP 

sx 

7018 

CA6371 

360 

JP 

Z,USTAP6 

70 IO 

FE5B 

370 

CP 

L5B 

70 1F 

CADÍ7E 

390 

JP 

ZfVOLTLIN 

70EE 

FE3D 

390 

CP 

I3D 

7029 

OT575 

400 

JP 

Z.VEFtCTE 

7027 

CD5B7Ü 

410 

CALL RST10 

7028 

CA097Ü 

420 

JP 

ZjR£TG3 

70211 

BAE479 

430 

JP 

CíLISTLIN 

7030 

FÊ7A 

440 

CP 

#7A 

7032 

CA0075 

450 

JP 

Z f NIMBAS 

7035 

FE63 

4èÔ 

CP 

#63 

7037 

CA8476 

470 

JF 

ZiCQPHOV 

7Ú3A 

FEá-D 

480 

CF 1 

#6D 

70X 

CAB476 

490 

JP 

2,CDi--rtOV 

703F 

FE3D 

500 

CF 

#3D 

7091 

CflDFTü 

510 

JF 

ZiEfCERRA 

"098 

C30473 

520 

JF 

SÍIÍTAKE 

7097 


530 

DEFS 20 




590 *£ 



7Ü5B 

23 

550 RST10: 

INC 

HL 

70a: 

TE 

560 

LD 

Ai(fL) 

7Ü5B 

FEOO 

570 

CP 

100 

705F 

CS 

580 

RET 

-f 

L 

7060 

FE30 

590 

CP 

*30 

7062 

X 

600 

CCF 


7063 

DO 

610 

SET 

NC 

7066 

FE3A 

620 

CP 

ISA 

7066 

D8 

630 

SET 

C 

7067 

07 

690 

iX 

A 

7068 

C9 

■650 

SET 


7069 


660 

DEFS 

10 



670 ; 



7073 

FE81 

680 MISJSC: 

CP 

*91 

7075 

D8 

690 

RET 

C 

7074 

FE5B 

700 

CP 

S5B 

7078 

DO 

710 

RET 

MC 

7079 

C620 

720 

ADD 

A, *20 

707B 

C9 

730 

RET 


707C 


790 

DEFS 

10 



750 1 



7084 

11F0FF 

760 CflLL: 

LD 

DE,DVOE 

7089 

D5 

770 

PUSH 

D€ 

708fi 

CS 

780 m : 

PUSH 

X 

7088 

3EF0 

790 

LD 

A,#Fü 

708D 

C3FXF 

800 

JP 

DV03 

7090 


310 

DEFS 

10 



820 i 



709A 

210DOO 

330 REMi 

LD 

HL,#OOOD 

709D 

22F0FB 

890 RET02: 

LD 

ÍIFBfÜí.HL 

70A0 

21F0FB 

850 

LD 

HLitfBFO 

70A3 

2PFAF3 

860 

LD 

i#F3FA>,ri 

70A4 

23 

870 

INC 

HL 

70A7 

HF3F3 

880 

LD 

UF3FB),H 

70AA 

013761 

690 

LD 

BC,*9Í37 

?MD 

18DB 

900 

JR 

Jlíf 

?oaf 


910 

l€FS 

10 



920 i 



7009 

215DF5 

?30 RET03: 

lD 

HL,*F55B 

708C 

017391 

990 

LD 

BC,t9173 

70BF 

C38A70 

950 

JF 

JUtP 

70C2 


960 

DEFS 

10 



970 ; 



70CC 

CD5601 

980 RET09: 

CALL 

*0156 

70CF 

013791 

990 

LD 

BC, *9 137 

7ÜD2 

C38A70 

1000 

JF 

JUtff 

70D5 


1010 

DEFS 

10 



1020 ; 



70DF 

XC9 

1030 ENCERRA: 

lD 

A,#C9 

70E1 

32DBFD 

1090 

LD 

i#FB0Ei,A 

7QE9 

Í9E6 

1050 

JR 

RET09 

70E6 


1060 

DEFS 

10 
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1070 *E 




1410 *E 


70F0 

títi&l 

1080 PARft: 

CflLL NUNS 

7168 

CD5B70 

1680 LISTAPG: 

CflLL RST 10 

70F3 

m 

1090 

DEC HL 

7168 

E85E 

1430 

JH Z.BÜ7 

70FA 

D9 

1100 

SET C 

716D 

3850 

1640 

JR CiBOj 

?(3F5 

7B 

1110 

LD A,É 

716F 

FE3C 

1650 

cp «ac 

70F6 

B2 

11 20 

Qfi D 

7171 

80ED 

1460 

JR NZ,BQ4 

70F7 

E? 

1130 

RET 

7173 

CDF070 

1670 

oallww 

70FB 


1140 

DEFS 10 

7176 

3808 

1430 

JR Cf BOI 



1150 \ 


7179 

8005 

1490 

JR SZ,B02 

7198 

uoooo 

üòO NUM: 

LD SEitOOOO 

717A 

1 

1 

1700 BOI: 

U BEf(TOi) 

7105 

OIOOOO 

1170 A04: 

LD BC, UOOOO 

717E 

13 

1710 

INC DE 

7106 

CD5B70 

1180 

CflLL R3T10 

717F 

ED53167S 

1780 B08: 

U ITG3KDE 

7106 

CS 

1190 

REI 2 

7133 

CD5B70 

1730 

CALL RSTIO 

710C 

DO 

1200 

REI NC 

7196 

FE2C 

1740 

CP #2C 

710D 

E5 

1210 

PUSH KL 

7133 

8041 

1750 

JR NZ V B07 

710E 

D63Q 

1220 

SüÊ IS) 

7i8A 

CD5B70 

1740 

CALL RST 10 

7110 

4F 

1230 

LD C,fl 

71 BD 

ji)3C 

1770 

JR NC,&07 

7111 

62 

iaw 

LD H.D 

718F 

CDBC7E 

1780 

CALL ÍNDICE 

7118 

6E 

1250 

LD L.E 

7192 

ED4B147B 

1790 

LU BC»ÍT03Í 

7113 

29 

1260 

ADD HL, HL 

7196 

889B71 

19» 

U ÍB03+2UHL 

im 

29 

1270 

ADD tLirt. 

7199 

ED4 30000 

1310 B03: 

LB íiOOOO^BC 

7115 

29 

1280 

ADD HL, tf. 

7Í9D 

C3CC7Ü 

1380 

JP RB04 

71 ii 

19 

im 

ADD HL, DE 

71AÜ 

FE5B 

1830 BÔ4: 

CP I5B 

7117 

i? 

1300 

ABD HL, DE 

71A2 

8027 

1840 

JR NZiÉO? 

7113 

G? 

1310 

ADD ti, BC 

71A4 

110000 

1350 

LD DE, #0000 

7119 

£B 

1320 

ES DE, HL 

7ÍA7 

ED53ÍÓ7B 

1840 

U> íT03í,DE 

71 iA 

21F5FF 

1330 

LD ti.íFFFj 

71AE 

ISiE 

1870 

JR Ê07 

71 1D 

E7 

1340 

FST *20 

71 AD 


189) 

DEFS 13 

71 1£ 

El 

1350 

POP HL 

71BF 

CDBC78 

1890 9)5: 

ULl índice 

711F 

m 

1360 

RET C 

71C2 

28C671 

1900 

LD 

7130 

C30571 

1370 

JP A04 

71 C5 

ShOOOO 

1910 B06: 

U ^LiiflOOÒQ} 

7183 


1390 

DEFS 10 

71C8 

22ÍÉ7B 

1920 

LD ÉTG3UÜ 



1390 ; 


71CB 

3E0C 

1930 B07: 

LD A,tOC 

718D 

D5 

1400 niW; 

PüSH DE 

71CD 

DF 

1940 

RST «18 

712E 

Cl 

\m 

POP BC 



1950 ; 


712F 

ED533471 

1420 

LD (AQ5*1),D£ 

7 ICE 

ED5B74F4 

1940 LISTPGl: 

LD D£Uif676í 

7133 

ShOOOO 

1430 fí05: 

LD HL, (UOOOO) 

71 D2 

CD8D71 

1970 B10: 

CALL PJÍLIN 

7134 

7C 

mo 

LD A,H 

71» 

308A 

1980 

JR NCíüSTFffi 

7137 

85 

1450 

OR L 

7ID7 

30F9 

1990 

jR mm 

7138 

3? 

1460 

SCF 



3000 ; 


7139 

C8 

1470 

RET 2 

71159 

AF 

8010 FlflST: 

XOR A 

713A 

Í3 

1480 

IHC DE 

71BA 

328276 

809) 

LD í 1071, A 

713B 

13 

1490 

INC DE 

71D0 

811500 

8030 

U) *1,10015 

7i3C 

ED53^t£71 

1500 

LD iAOà+El.EE 

71E0 

C39D70 

8040 

JP RETffi 

7140 

ED5B0000 

1510 A0ò: 

LD DÊ t í*OOÓO) 

71E3 


3050 

DEFS 30 


mm 

1520 

LD HL,iT03) 



9)40 ; 


7147 

E7 

1530 

RST 180 

7201 

E8O07B 

8070 LISTP68: 

LD ÍTOU,*i 

7148 

EB 

1540 

ES DE, HL 

7204 

CDB70O 

8030 Bll: 

CALL *0087 

7149 

ED434F71 

1550 

LD" (Á07+21.BC 

7207 

3800 

2090 

JR CfFULST 

714D 

EOtM) 

1560 AÜ7: 

LD DEiílOflOO) 

7209 

D5 

8100 

PUSHDE 

7151 

ce 

1570 

RET 2 

720A 

CD8B78 

2110 

CALL I?FLÍN 

7158 

3F 

1590 

CCF 

720D 

Dl 

8180 

pop DE 

7153 

C9 

1590 

RET 

720E 

3SC? 

8130 

JR CíFíPtCT 

7154 


160! j 

DEFS 80 

7210 

CD6D71 

2140 

CALL PXLIW 





7213 

80EF 

2150 

JR NZiBIl 





7215 

18C3 

2140 

JR flflST 





7217 


2170 

DEFS 20 
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2180 tf 




£740 *£ 



Tm 

22167B 

2190 ÍHPLIH: 

LD ÍT03),H 

7201 

110300 

2750 WLTL1N: 

LD 

BE, *0003 

72£E 

210400 

2200 

LO HL. *0004 

72D4 

EB531B7B 

2760 

LD 

<T04),OE ' 

7E31 

09 

2210 

ADD HL, BC 

7208 

CDF070 

$70 

CALL ?m 

7H3E 

018452 

220 

LD BC, *5284 

72DB 

3810 

2780 

JR 

C.C02 

7235 

CDB670 

$30 

CALL CflU. 

72ÍD 

2®A 

$90 

JR 

NZ.COi 

7E30 

3A227B 

$40 

ü) At (T07S 

7EHF 

CD5B7G 

2800 

CALL RST10 

7E3B 

FE® 

$30 

CP 100 

72E2 

FE5B 

$10 

CP 

#5B 

723D 

2805 

$60 

JR Z,BÍ4 

72E4 

2007 

2620 

JR 

NZ.CG2 

raF 

CD3B76 

2270 

CALL YERCHR 

72E6 

110100 

2830 

LD 

DE.ftWOl 

724E 

3F 

2280 

CCF 

72E9 

ES53187B 

2640 C01: 

LD 

iT04),D£ 

7?43 

D0 

£290 

RET NC 

72ED 

ED5B76Í6 

2850 C02: 

LD 

DE,(SF6?t) 

7244 

EA167B 

2300 B14: 

Lí HL,(T03) 

72F1 

2A007B 

2660 

LD 

HLjíTOll 

?$7 

011234 

$10 

Li BC, *3412 

'm 

$16$ 

2870 

LD 

(T031,® 

$4A 

CD8670 

2320 

CALL CALL 

72F7 

3E0C 

28® 

LD 

A,*® 

7240 

3E20 

2330 

LD A, *20 

7$9 

DF 

$90 

RST 

118 

7E4F 

DF 

$40 

RSI *18 

7$A 

am\ 

2900 C03: 

CALL PXLIH 

7250 

215DF5 

2350 

LD HL,IF55D 

72FD 

3005 

$10 

JR 

NC.C04 

7253 

QD6B72 

2360 

CALL IffL 

72FF 

20F9 

2920 

JR 

NZ,C03 

7256 

C9 

2370 

RET 

7301 

C3CC70 

29® 

JP 

RET04 

7257 


2380 

DEFS 20 

7304 

C5 

2940 C04: 

PUSH K 



2390 } 


7305 

Dl 

2950 

POP 

DE 

7268 

CD5B70 

2400 IMPL: 

CALL RST10 

7306 

2A76F6 

29® C05: 

LD 

HL,(IF6761 

726E 

2806 

2410 

JR Z.B16 

7309 

E7 

2970 

RST 

120 

7270 

CD9672 

2420 

CALL IHPTELA 

730A 

201E 

29® 

JR 

NZ,COÒ 

7273 

D8 

2430 

RET C 

730C 

110000 

$90 

LD 

DE, *0000 

7274 

18F5 

2440 

JR IMPL 

730F 

ED53167B 

3000 

LD 

IT031,DE 

7276 

3E0A 

2450 B16: 

LD A,tOA 

$13 

C3CE71 

3010 

JP 

LISTPS1 

7278 

0)9672 

2460 

CALL ItfTELA 

$16 


3020 

DEFS® 

7278 

D6 

2470 

RET C 

732A 

D5 

®® COó: 

PUSH DE 

727C 

3E01 

2480 

LD A, *01 

73$ 

18 

3040 C07: 

DEC 

DE 

727E 

32DDF3 

2490 

LD <*F3M)),A 

732C 

1B 

3050 C08: 

DEC 

DE 

7281 

C9 

2500 

RET 

732D 

ÍA 

3060 

LD 

A, (DE) 

7282 


$10 

DEFS 20 

$$ 

FEOO 

®7Ô 

CP 

NO 



2520 i 


7330 

2QFA 

30® 

JR 

fC,C08 

7296 

4F 

2530 líPTEU): 

LD C,A 

7332 

13 

3090 

INC 

DE 

izn 

3A467B 

$40 

LD A,(T1B) 

$33 

ED533873 

31® 

LD 

(C09M1.DE 

?29fl 

FEOO 

2550 

CP *00 

$37 

anoooo 

3110 C09i 

LD 

®,(*00001 

729C 

2007 

2560 

■IR 12,817 

733A 

Cl 

31$ 

FOP 

BC 

729E 

3ADCF3 

$70 

LD A,Í*F3DC) 

7338 

A7 

31® 

AND 

A 

mi 

FE17 

2580 

CP «7 

733C 

ED42 

3140 

SBC 

HL,® 

im 

3F 

$90 

CCF 

733E 

$ 

31® 

PUSH BC 

TEM 

D8 

2600 

RET C 

733E 

20EA 

3160 

IR 

HZ,C07 

72A5 

79 

$10 B17: 

LD A,C 

7341 

Cl 

3170 

POP 

BC 

7316 

DF 

2620 

RST *18 

7342 

ED4B187B 

31® 

LD 

Kiim 

72A7 

C9 

2630 

RET 

7346 

OÊ 

31® 

DEC 

BC 

72A3 


2640 

DEFS 20 

7347 

$ 

3200 

LD 

A*C 



2650 i 


7348 

BO 

$10 

DR 

& 

72BC 

D630 

2660 ÍNDICE: 

SIB *30 

7349 

2S1A 

3220 

JR 

z>m 

72BE 

37 

$70 

ADD A, A 

7348 

ED431S7B 

3230 

U) 


72BF 

1600 

2680 

LD Dj *00 

734F 

1885 

3240 

JR 

CCS 

72C1 

3F 

$90 

LD E,A 

$51 


3250 

DEFS 

TECE 

21027B 

2700 

LD tt,T02 



3260 1 



72C3 

19 

2710 

ADD HL, DE 






72C6 

C9 

2720 

RET 






72C7 


2730 

DEFS 10 
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rm 

05 

3,370 CIO: 

FtfSH DE 

756B 

0)462076 

3u3ú RhTBASs 

LD 

88,1106) 

73SÓ 

13 

3230 

INC 

Et 

75óF 

78 

36% 

LD 

M 

7367 

13 

3390 

INC 

DE 

75% 

BI 

3700 

GR 

C 

7360 

ED536Ü73 

3300 

LD 

íCll+t),D£ 

7571 

CAB970 

3710 

JP 

Z,REFG3 

736C 

2ADOOO 

3310 Cl 1 : 

LO 

HL, í #5000) 

7574 

2100*30 

3720 

LD 


736F 

a 

33a) 

POP 

SC 

7577 

EffiOTB 

3730 

LD 

(T06Í,HL 

7370 

mim 

3330 

LÜ 

iClS£},BC 

757A 

8A76F6 

3740 

LD 

HUHFÓ7Ó* 

7374 

EB5Bí»30 

3340 02: 

LB 

DE,í#MÒ0j 

7571; 

ED4376F6 

3750 

LD 

í#f67ò),BC 

7378 

mm 

3350 

JP 

USTFffi 

7581 

m 

3760 

DEC 

BC 






7582 

ED4348FC 

3770 

LD 

í#FC48),BC 






7586 

3600 

3780 

LD 

(HÜ,#OÒ 






7539 

23 

3790 

INC 

HL 

7500 


3360 

QR0 

175» 

7539 

3600 

3800 

LD 

(HL), 100 



3370 ; 



758B 

C33F75 

3810 

P 

m 

7500 

QEBTO 

3380 mm: 

Cfiil RÊT10 

758E 


3820 

DEFS 30 

7503 

FE72 

3390 

CP 

#72 



3830 i 



7505 

CA6B75 

d/m 

JP 

ZjRETBAS 

75AC 

g 

I 

Si 

3840 UNIfiAS: 

LD 

BC, fTOÒ) 

7509 

FE75 

3410 

EP 

175 

75&> 

m 

3850 

LD 

A,B 

75M 

CAAC75 

3420 

JP 

ZiÜNIShS 

75B1 

BI 

3860 

GR 

C 

750D 

ED4B207B 

3430 005: 

LD 

BC, ÍT06Í 

7562 

CA897Ü 

3870 

P 

2,fi£T03 

7511 

73 

3440 

LD 

A,B 

75B5 

£10000 

3880 

U) 

HL.tOOOO 

7513 

BI 

3450 

ÜR 

c 

7568 

E2207B 

3090 

LD 

iTOàí.HL 

7513 

C2S970 

3460 

P 

NZ,f£T03 

75ÊB 

£W37ófé 

3900 

U» 

i*FÓ76),EC 

7516 

EM76F6 

3470 

LD 

BC,iiF67ò) 

75BF 

OB 

3910 

DEC 

BC 

75 IA 

ES432075 

3400 

LD 

ÍDÔò+EliBC 

75C0 

EM&BFC 

3920 

LD 

(#FM),BC 

75 1E 

ED4KM00 

3490 BG6: 

LD 

ÊC, í#00Ò01 

75C4 

C33F75 

3930 

jP 

008 

7532 

78 

3500 

[3 

AjB 

75C7 


3940 

DEFS 30 

7533 

B! 

3510 

m 

C 






7524 

CAB970 

3520 

JP 

ljREJÜj 






7527 

ED5E76Fè 

3530 

LD 

DE,(fF&?6) 






753B 

ED53207B 

3540 

LD 

(TOM, DE 






m 

CD0D71 

3550 007: 

CALL PXLÍN 






7532 

30FB 

3560 

JR 

NC.D07 






7534 

30F9 

3570 

JR 

NZ,D07 






7536 

ED437tía 

3580 

ü) 

<tF£>?6),EC 






753A 

08 

3590 

DEC 

BC 






7538 

EPfj4SF£ 

3600 

LD 

i#FC4S5,ffi 






753F 

mm 

3610 SOB: 

LD 

HL,TQ5 






7543 

115EF5 

3620 

LD 

DE t <F55E 






TM 

010600 

3630 

LD 

BC, #04 






7540 

flM 

3640 

LDIfi 







754A 

0730 

3650 

JP 

RETÜ3 






754D 


3660 

BEF5 30 








3670 ; 
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75E5 

CD5B70 

3950 *t 
3960 VEFCTE: 

75E8 

CA8970 

3970 

75EB 

FE3D 

3980 

?5ED 

8810 

3990 

75EF 

010000 

4000 

75F2 

£0431678 

4010 

75F6 

11 £478 

4020 

759 

12 

403Ü 

75FA 

13 

4040 

m 

CD5B70 

4050 £01: 

75FE 

290A 

4060 

7600 

12 

4070 

7601 

13 

4080 

7402 

IA 

4090 

7403 

FEFF 

4100 

7605 

CAB970 

4110 

760E 

lffl 

4120 

760A 

AF 

4130 E02: 

740B 

12 

4140 

760C 

3£FF 

4150 £03: 

760E 

2H227B 

4160 

7611 

3E0C 

4170 

7613 

DF 

4180 

7616 

£12278 

4190 

7617 

CD4B72 

4200 

761A 

C3CE71 

4210 

761D 


4220 

763B 

2I5DF5 

4230 ; 

4240 9ERCHR: 

765 

11237B 

4250 E10: 

7641 

E5 

4260 

7442 

23 

4270 Eli: 

7643 

13 

4280 

7644 

IA 

4290 

7645 

FEOO 

4300 

7647 

2S1B 

4310 

7649 

4F 

4320 

764A 

TE 

4330 

764B 

FEOO 

4340 

7643 

37 

4350 

764E 

2314 

4360 

7650 

B9 

4370 

'651 

2BEF 

4380 

7653 

FE41 

4390 

7655 

3809 

4400 

7657 

FE5B 

4410 

7659 

3005 

4420 

745B 

C620 

4430 

7650 

B9 

4440 

765 

£52 

4450 

7660 

£1 

4460 Eia: 

7661 

23 

*470 

7662 

1SDA 

44® 

7664 

El 

4490 E13: 

7665 

C9 

4500 

~í*ó 


4510 


” 1 

3 R0GRAMA 

BIT- BASIC 

CALi RST10 

7684 

32427B 

P 

2,RET03 

7687 

CDF070 

CP 

I3D 

768A 

BAB97Q 

JR 

2, £03 

768D 

ED53397B 

LD 

BC,#0000 

7691 

13 

LD 

(T03)jBC 

769? 

ED533B7B 

LD 

DE,T09 

7696 

CD5B70 

LD 

(DE) jA 

7699 

FE2C 

INC 

DE 

769B 

C2B970 

CALL RSTÍO 

769E 

CÜFÜ70 

JR 

2 ,£02 

76A1 

BAB970 

LD 

(DE), A 

7664 

ED533D7B 

INC 

DE. 

76A6 

CD5B7Q 

LD 

A,(DE) 

76AB 

FE2C 

CP 

•FF 

76AD 

2011 

JP 

Z,RET03 

76AF 

E5 

JR 

E01 

76® 

CDF070 

XOR 

A 

76B3 

Cl 

LD 

(DES, A 

76® 

DAC076 

LD 

A,#FF 

76B7 

03 

U) 

(107), A 

76® 

ED433B7B 

LD 

flfWC 

76® 

ED533D7B 

RST 

«8 

76C0 

ED53167B 

LD 

HL ,108*1 

76C4 

ED5H76F6 

CALL IMPL 

76C8 

CDED71 

P 

LISTPÊ1 

76CB 

3005 

DEFS 30 

76CB 

CACC70 



76® 

1SF6 

LD 

Si,4F55D 

76D£ 

C8CC70 

LD 

DE.TO0 

76D5 

CD2D7Í 

PUSH HL' 

76D8 

®23 

INC 

HL 

76BA 

01F5FF 

INC 

DE 

76® 

1B28 

LD 

A, (DE) 

76Ef 


CP 

«0 

76FD 

03 

JR 

Z,E13 

76FE 

03 

LD 

C,A 

76FF 

ED430577 

LD 

A, (HL) 

7703 

ED4B0000 

CP 

*00 

7707 

ED433F7B 

3CF 


770B 

ED4B397B 

JR 

Z,E13 

770F 

OB 

CP 

C 

7710 

ED43167B 

JR 

2, EU 

7714 

AF 

CP 

141 

7715 

3214F4 

JR 

C,Ei2 



CP 

I5B 



JR 

NC,E12 



ADD 

A, 120 



5 

C 



JR 

Z,£U 



POP 

HL 



I® 

a 



JR 

E10 



POP 

a 



RET 




DEFS® 




COMPILADO 


4520 *E 



45® CÜPHÜV: U) 

(T15),A 

4540 

CALL 

PARft 

4550 

JP 

C,R0<8 

4560 

LD 

(TIO), DE 

4570 

INC 

DE 

45® 

Lí 

(Ttlí.DE 

4590 

CALL 

RSTIO 

4600 

CP 

#2C 

4610 

JP 

NZ,e03 

4620 

CALL 

PARU 

46® 

JP 

C,R£7Ú3 

4640 

LD 

(T12),DE 

46® 

CALL 

RSTIO 

4660 

CP 

1® 

4670 

JR 

NZ.HOí 

46® 

PUSH 

DE 

4690 

CAU. 

PARN 

47® 

POP 

BC 

4710 

JP 

C,HGO 

47® 

INC 

BC 

47® 

LD 

(Til), BC 

4740 

U) 

(T12í,DE 

4750 HOÜ: 

U 

(T03),DE 

47® 

Lí 

DE,(IF676) 

4770 H01: 

CALL 

PILIN 

47® 

JR 

NC,H02 

47® 

JP 

Z.RET04 

4800 

JR 

HOÍ 

4810 H02: 

JP 

NZiR£T04 

48® 

CALL 

PILIN 

48® 

JR 

NC.H03 

4840 

Lí 

®,#FFF5 

4850 

JR 

H05 

4860 

DEFS 

® 

4870 HÜ3: 

INC 

BC 

4880 

INC 

BC 

4890 

LD 

IH04+2!,BE 

4900 H04; 

LD 

BC, («000 ) 

4910 H05j 

LD 

(T13),BC 

49® 

LD 

BC,ÍT10! 

49® 

DEC 

BC 

4940 

Lí 

(TOS),® 

4950 

XGR 

A 

49® 

Lí 

(IF414).A 
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4970 *E 





5330 *e 

77Í3 

3EC9 

4930 '31101: 

lí 

AjíC? 

77C4 

3A427B 

5540 OS.02: 

771A 

330CFF 

4990 

LD 

(ÜFFGC)jA 

77C7 

FB3 

5550 

77ÍD 

$4778 

5000 

LB 


77C9 

Cfil377 

55 60 

7730 

CDB700 

5010 

CALL #0007 

77CC 

3A417B 

5570 

7733 

BACC70 

5030 

JP 

c,íeo4 

77CF 

EEFF 

5580 

7726 

3A14F4 

5030 

U3 

fl,(#F414) 

77D1 

3E*17B 

$90 

7739 

FEOG 

5040 

CP 

#M 

7704 

CA1877 

5600 

77EB 

C2CC70 

5050 

JP 

ÍG,fi£T04 

77D7 

$30 

$10 

772£ 

EB5B76F6 

5060 

U) 

DE,(#F676i 

77D9 

DF 

5630 

77$ 

□ED7Í 

5070 HO?: 

CALL PXLIN 

TTDfl 

3A007E 

5630 

77$ 

3005 

5080 

JR 

PC.H08 

77DD 

011334 

$40 

7737 

CACC70 

5090 

JP 

Z,RET04 

77E0 

C$670 

5650 

773A 

1SF4 

5100 

JR 

H07 

77E3 

C39A70 

5660 

773C 

38F4 

5110 HQS; 

$ 

Z,H07 

77E6 


$70 

77$ 

33007B 

5130 

LD 

(T011.HL 




7741 

EB5B3B7B 

5130 

LB 

DE, (TU) 




7745 

£7 

5140 

RST 

120 




7746 

DSCC70 

5150 

JF 

PC.RET04 




7749 

ED5B3F7B 

5160 

LD 

D£,iT13) 




7741) 

3A3D7B 

5170 

LD 

HL,(T12I 




7750 

33 

5180 

INC 

HL 




7751 

$3878 

5190 

Lí 

(T13),HL 




7754 

E7 

5300 

RST 

#30 




7755 

DEEC70 

$10 

JP 

NC,RET04 




7758 

3A437B 

5320 

U) 

A,ÍT151 




7756 

$4678 

$30 

U) 

ÍT1SÍ.A 




77$ 

FE63 

$40 

CP 

#63 




7760 

3833 

$50 

JR 

Z, Hl 1 




7763 

C5 

$60 

FUSH BC 




7743 

C5 

$70 

PUSH BC 




7764 

DDE! 

5380 

POP 

I? 




7746 

01F654 

5390 

í 

EC,I54F6 




7769 

CD8670 

$00 

CflLL CflLL 




776C 

ED483D7B 

$10 

U) 

BC, (T13Í 




7770 

DD? 102 

5330 

LD 

(I1+3),C 




7773 

DD7003 

5330 

í 

( 11+3) ,8 




7776 

01F754 

$40 

í 

BC,#54F7 




7779 

CD8670 

5350 

CALL CflLL 




777C 

1 

i 

$60 

í 

BC,(T01) 




7780 

BD7103 

5370 

í 

(11+2) ,C 




7783 

DD7003 

53Ki 

Lí 

(11+31,8 




7786 

Cl 

5390 

FOP 

BC 




7787 

343D7B 

5400 

í 

HL.ÍT1B) 




778A 

CD3873 

5410 Hlls 

CALL IHPLÍN 




77SD 

3A0078 

5430 

LD 

UrttWI 




7790 

32167B 

5430 

LD 

(T03),H 




7793 

tf 

5440 

KOR 

A 




7794 

$467B 

5450 

í 

íTIBl.fl 




7797 

31DCF3 

5460 

LD 

HL,*F3DC 




779A 

$ 

5470 

ppr 

f Ht_> 




7798 

$C3 

5480 

uf 

A,IC3 




779D 

33GCFF 

5490 

í 

í#FFOC!,A 




77 AO 

$4778 

5500 

í 

lT19),fl 




77A3 

C39A70 

5510 

JF 

RET01 




77 Aó 


5$0 

DEF5 30 





157 


LB ft f (T15! 
CP #63 
JP Z,OUI 
Lí A) (T14) 
m #FF 

lq (mi.fi 

JF Z.QlOt 

U fl.t» 

fisr «a 

LB H.iTíll 
LD BC, #3413 
(Hl CflLL 
JP RETOl 
DEFS 30 
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5690 *E 





61® 

*E 



7804 

CDEC78 

5690 SINTAXE: 

CALL 

EMDE 

739B 

7E 

ol90 

106: 

LD 

Ai (HL) 

7807 

01QG7F 

5700 101: 

LD 

BC, 181 

739C 

FEOO 

6800 


0> 

100 

780A 

FEFfl 

5710 

CP 

«EA 

789E 

C81878 

6810 


JP 

NZ,IÜE 

780C 

8006 

5780 

JR 

NZ.I08 

78A1 

oa 

6880 

109: 

LD 

íbcm 

7B0E 

ffl* 

5730 

DEC 

HL 

joAu 

ED6B6D7B 

6830 


LD 

BCiíTKJ 

7B0F 

110A60 

5760 

LD 

DE,ERR 

78A6 

3E6D7B 

6860 


LD 

ÍT2Q),A 

7312 

Ift 

5750 108: 

LD 

A, (DE) 

78A9 

39 

6850 


CP 

C 

7313 

13 

5760 

INC 

DE 

78AA 

81007F 

6860 


LD 

a, ia 

*i 814 

FE00 

5770 

CP 

*00 

78AD 

115EF5 

6870 


LD 

DE.IF^E 

7816 

CAA178 

5780 

JP 

Z,IÜ9 

m 

01FA00 

6880 


LD 

BCjíOOFA 

7819 

FEFF 

5790 

CP 

*FF 

7BB3 

ESBO 

6890 


LMR 


73 ÍB 

8865 

5800 

JR 

2,105 

7885 

18 

6300 


LD 

(EEKA 

731D 

FEFE 

5810 

CP 

#FE 

7SB6 

CAB970 

6310 


JP 

ZjíCÍOS 

?81F 

2B6D 

5880 

JR 

Z, 107 

7889 

815EF5 

6380 

110: 

LD 

HLçIFjjE 

7821 

7883 

FEFC 

8876 

5830 

5360 

CP 

JR 

#FC 
Z, 100 

7BBC 

7EBD 

TE 

a 

6330 

6360 

U3 

INC 

Aj (hLÍ 
H 

7385 

FEFB 

5B50 

CP 

IFB 

78BE 

FEOO 

6350 


CP 

100 

7887 

8085 

5B60 

JR 

NZ, 103 

7BC0 

CA9A70 

6360 


JP 

ZfRETDl 

7889 

TE 

5870 

LD 

A,(HJ 

73C3 

DF 

6370 


RST 

118 

7S8A 

£6573 

5890 

LD 

(T171.A 

m 

1BF6 

6380 


JR 

110 

7B8B 

83 

5890 

INC 

H 

78C6 


6390 


DEFS 

30 

7B2E 

I83E 

5900 

JR 

105 



6600 

! 

LD 

SEjIN 

7830 

5910 

DEFS 

i 30 

70E6 

110060 

6610 

LISTLIN: 

m í 

FEF? 

5980 103: 

CP 

IF9 

7BE7 

3E00 

6680 


LD 

A,füG 

7350 

8003 

5930 

JR 

NZ,I06 

7BE 9 

C3077B 

6630 


JP 

101 

7858 

3A657B 

5960 

LD 

A,(T171 







7855 

FEFB 

5950 106: 

CP 

IFB 







7957 

8306 

5960 

JR 

Z,!6A 







7959 

08 

5970 

LD 

ÍBC),A 







785A 

03 

5930 

INC 

BC 







785B 

1BB5 

5990 

JR 

108 







785D 

386D7B 

6000 I6A: 

LD 

(T801.A 







7360 

18B0 

6010 

JR 

108 







7968 

7E 

6080 105: 

LD 

A, (HL) 







7863 

FEOO 

6030 106: 

CP 

100 







7865 

8BAB 

6060 

JR 

Z.I08 







7867 

83 

6050 

INC 

HL 







7B60 

feec 

6060 

CP 

I8C 







7B6A 

2BA6 

6070 

JR 

z,ioe 







786C 

08 

6090 

U> 

(BC) , A 







7B6D 

03 

6090 

INC 

BC 







7868 

18F8 

6100 

JR 

105 







7870 


6110 

DEFS 30 







7888 

7E 

6180 107: 

LD 

A,(HÜ 







788F 

FE63 

6130 

CP 

163 







7891 

CC8B79 

6160 

CALL Z,PRIfL'N 







7394 

FE66 

6150 

Cf 

166 







7896 

[16379 

6160 

CALL Z,ULTLIN 







7899 

IBC7 

6170 

JR 

105 
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64W *t 



7SE 

47 

6450 SfflE: 

U) 

8, A 

7®) 

33 

6460 

INC 

HL 

7® 

TE 

6470 

U 

A.ÍHJ 

7EEF 

4F 

6490 

U 

Cf A 

70F0 

llOEoO 

6490 

UB 

DÊ.TASELA 

79F3 

IA 

6500 

LD 

A, (DE) 

79F4 

13 

6510 

INC 

DE 

m 

BS 

6530 130; 

CP 

8 

73F6 

aaoB 

6530 

JR 

2,133 

7BFB 

FEFA 

6540 121: 

CP 

•FA 

ma 

ES 

6550 

RET 

Z 

7SFB 

FEOO 

6560 

CP 

too 

m 

IA 

6570 

U) 

A, ÍDE) 

m 

13 

6580 

INC 

DE 

m 

30F4 

6590 

JR 

2,130 

m 

lff5 

6600 

JR 

131 

7903 

IA 

6610 122: 

LD 

A, (DE) 

7904 

FE20 

6630 

£? 

120 

7906 

13 

6630 

INC 

DE 

7907 

C8 

6640 

RET 

2 

7908 

B9 

6650 

CP 

C 

7909 

20ED 

6660 

JR 

NZ.I21 

7908 

a 

6670 

INC 

H 

790C 

C9 

6690 

REI 


Tm 


6690 

DEFS 

:30 



6700 i 



793 

E5 

6710 PRIltlN: 

PUSH 

HL 

792C 

85 

6720 

PUSH 

DE 

793 

C3 

6730 

PLEH 

BC 

rm 

£D5B7tf6 

6740 

LD 

DE,(fF676) 

Tm 

□HI71 

6750 

OU 

PILIN 



6760 ; 



Tm 

Sff7 

6770 130: 

LD 

(IFTFBíiH 

ws 

El 

6780 

POP 

HL 

7739 

010000 

6790 

LD 

BC, KM) 

793C 

09636 

6300 

CALL 

13616 

79T 

44 

6BÍ0 

U) 

B,H 

7940 

40 

6330 

LD 

C,L 

7941 

81 

6330 

POP 

DE 

7943 

El 

6840 

POP 

HL 

7943 

a 

6850 

INC 

H 

Tm 

C9 

6860 

RET 


7945 


6870 

DEFS 

30 



6880 ; 



7943 

E5 

6890 ULTIIN: 

PUSH 

tl 

7964 

85 

6900 

PUSH 

DE 

7965 

es 

6910 

P1EH 

BC 

7966 

EB5B76F6 

6930 

LD 

DE,tlF676) 

796A 

32437B 

6930 140: 

LD 

(T16!,íí. 

796D 

mm 

6940 

OU 

PUM 

7770 

30F8 

6950 

JR 

NC,I40 

7973 

3 F6 

6960 

JR 

N2,I40 

7974 

2A4J7B 

6970 

LD 

HL,(T16) 

7977 

1SBC 

6990 

JR 

130 


J 
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05 _ ROTItMA CARREGAMENTO 

BIT-BASIC 

Quando é e^ecut^do o cocando 
BLOAD"A:BIT.ASS" >R ou BLOAD"CAS:BIT'‘ ,R 


□ programa BIT-BASIC é colocado na memória do seu MSX nos 
endereços entre irA5Q0 e #C0FT . „ 

0 “Endereço de Execução" è #C02G e o caráter R do comando 
acima indica que o Z-80 deve passar a executar as Instruções em 
“Linguagem de Máquina" contidas a partir deste endereço. 

Estas Instruções executam os procedimentos M de movimentar o 
BIT-BASIC da RAM (#A5Q0 a #COFF> para a RAM paralela á RJM 
(#6000 a #7FFF ) * , 

São movimentados o "Código Objeto" do BIT-BASIC, a Rot í" a ae 
Camunicaelo" do BIT-BASIC com o Interpretador BASIC e a Tabela 
de Sintaxe" do BIT-BASIC. 

Além disto, a "Rotina de Carregamento" também efetua a 
colocação dos "Endereços de Desvio" nos GANCHOS utilizados e 
"Liga" o GANCHO da rotina P1NLIN do BIOS ( (tFDDB ) , colocando 
neste ponto uma Instrução JUMP <#C3> para a rotina DESVIO do 
BIT-BASIC UFDD9). 


ROTINA ASSEMBLER 


0010 


□RG 

#C020 

0020 


IN 

A , < #AB 1 

0030 


LD 

( #B58C í , A 

0040 


CP 

#F0 

0050 


LD 

A , #FC 

0060 


JR 

NZ , XO 1 

0070 


LD 

( #C0 18 ) , A 

0080 


JR 

X02 

0090 

X01 : 

LD 

A , #A8 

0100 


LD 

( #C018 ) , A 

ono 

X02 : 

GUT 

A,#A8 

0120 


LD 

HL i SB500 

0130 


LD 

DE, «7000 

0140 


LD 

BC , #OAOO 

0150 


LDIR 


0Í 60 


LD 

HL , ttCOOO 

0170 


LD 

DÊ , #FFD9 

0180 


LD 

BC, #0020 

0190 


LDIP 


0200 


LD 

HL , #BFFQ 

0210 


LD 

DE, #6000 

0220 


LD 

BC , #000F 

0230 


LDIR 


0240 


LD 

HL , #A500 

0250 


LD 

DE,#600E 

0260 


LD 

BC , #OFF2 

0270 


LDIR 
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0280 

0290 

0300 

0310 

0320 

0330 

0340 

0330 

0360 

0370 

0380 

0390 

0400 

041C 

0420 

0430 

0440 


LD HL i #BF90 
LD DE ,#7800 
LD BC , 004C 
LDIR 

LD A,#C3 
LD (#FDDB)»A 
LD HL»#FFD9 
LD <#FDDCí,HL 
LD HL ,#FFEB 
LD í #FFOD ) ,HL 

LD HL,(#F676) 
LD <#C089),HL 
LD HL, #0000 
LD (#8001), HL 
LD A, (#6580 
OUT ( #A8 ) , A 
RET 


0010 Indica ao Compilador A5SEM8LER para colocar a rotina de 
carregamento a partir do endereço #C020. 

0020 Coloca em REG-A o valor que determina a "Configuração" 
atual dos Bancos de Memória ROM/RAM (controlada pela PPI). 
Este valor é #F0 para o HOTBIT e #AO para o EXPERT, em 
condicões normais. 

0030 Coloca REG-A no endereço #B58C que neste momento 
corresponde ao operando da Instrução 0790 da rotina JUMP 
do BIT-BASIC, utilizada para "Retornar" a configuração 
normal dos bancos de memória RQM/RAM, via Rotina DESVIU. 

+*#■* As Instruções 0040 a 0090 obtém o valor que deve 
substituir na PPI o valor "Original" (ROM 8ASIC-BI0S 
ATIVA) para que seja "Ativado" o banco de memória RAM 
"Paralela" à memória ROM nos endereços #6000 a #7FFF, onde 
será colocado o BIT-BASIC. 

Estes valores são #FC (HOTBIT) ou #AB (EXPERT). 

0040 Compara REG-A (valor da Configuração Atual) com #F0. 

0050 Coloca o valor #FC em REG-A. 

0060 Se o valor anterior de REG-A (colocado em #B08C) nao era 
#F0 (HOTBIT), desvia para a Instrução 0090 (X01). 

0070 Coloca REG-A (#FC - HOTBIT) no endereço #C01B, que 
corresponde ao operando da Instrução 0170 (DV02) da rotina 
DESVIO, destinada a "Ativar" a memória RAM do BIT-BASIC 
(#4000 a #7FFF) . 

0080 Desvia para a Instrução 0110 (X02). 

0090 Coloca em PEG-A o valor #A8, correspondente à Configuração 
desejada (EXPERT). 

0100 ídem Instrução 0070, valor #A0 (EXPERT). 

0110 "Ativa" a memória RAM "Paralela" à memória ROM, nos 
endereços #4000 a #7FFF, Para Isto, REG-A contém neste 
momento o valor #FC (HOTBIT) ou #AB (EXPERT). 

0120 Carrega #B500 em REG-HL (Endereço DE). 

0130 Carrega #7000 em RE6-DE (Endereço PARA). 

0140 Carrega #OAOO em REG-BC (Número de BYTES). 
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0150 

0160 

0170 

0190 

0190 


0200 

0210 

0220 

0230 

0240 

0250 

0260 

0270 

02B0 

0290 

0300 

0310 

0320 

0330 

0340 

0350 


0360 

0370 


0390 

0390 

0400 

0410 


0420 

0430 

0440 


Move 2560 BYTES ( #0A00) , a partir do endereço #B500, para 
O endereço #7000 (Programa BIT-8ASIC) . 

Carrega #C000 em REG-HL (Endereço DE ) . 

Carrega #FFD9 em REG-DE (Endereço PARAí. 

Carrega #0020 em REG-BC (Número de BYTES). 

Move 32 BYTES (#0020), a partir do endereço #C0Q0, para o 
endereço #FFD9 (Rotina DESVIO, de comunicação do BIT-BA5IC 
com o BAS I C ) . 

Carrega #8FF0 em REG-HL (Endereço DE). 

Carrega #6000 em REG-DE (Endereço PARA). 

Carrega #OÒOF em REG-BC (Número de BYTES). 

Move 15 BYTES (#OOOF), a partir do endereço #BFF0 , para o 
endereço #6000 (Primeira entrada da TABELA DE SINTAXE). 
Carrega #A500 em REG-HL (Endereço DE). 

Carrega #600£ em REG-DE (Endereço PARA) . 

Carrega #0FF2 em REG-BC (Número de BYTES). 

Move 4082 BYTES (#0FF2), a partir do endereço_#A500, para 

0 endereço #600E (Demais entradas na TABELA DE SINTAXE). 
Carrega #BF90 em REG-HL (Endereço DE). 

Carrega #7B00 em REG-DE (Endereço PARA). 

Carrega #0Q4C em REG— BC (Número de BYTES). 

Move 76 BYTES (#0040, a partir do endereço #BF90, para o 
endereço #7B00 (Valores iniciais da Areas de Trabalho). 
Coloca #C3 em REG-A (Código Instrução JUMP do Z-80). 

Coloca REG-A (#C3) no endereço #FDDB (Primeiro BYTE do 
GANCHO de PINLIN) . 

Coloca #FFD9 em REG-HL. 

Coloca #FFD9 (que è o endereço da rotina DESVIO do 
3IT-BA5IC) em #FDDC. Assim, teremos a Instrução Z-Bü 
“#C3 #D9 #FF" (JUMP #FFD9> instalada no GANCHO da rotina 
PINLIN (Esta Instrução é aí colocada para um 

desvio incondicional para a rotina DESVIO do BIT-BASIC, a 
cada linha entrada pelo usuário no modo DIRETO.) 

Coloca #FFE8 em RÊS-HL. . 

Coloca #FFEB no endereço #FF0D ( #FFGD é a GANCHO da rotina 
MAIN-ENTRY do BASIC - #FFEB corresponde á Instrução 0140 
ÍDVOI) da rotina DESVIO). ... 

Este GANCHD será "Ligado em outro ponto do BI ( -brh i L , 
quando extiver executando a rotina C0PM0V. 

Coloca #F676 em REG-HL (endereço início programa BASIC) . 
Coloca REG-HL no operando de endereço da instrução 0410, 
gue fica então "LD (#B001 ) ,HL" . 

Coloca #0000 em REG-HL . 

Carrega #0000 nas duas primeiras posiçoes do Programa 
BASIC (o gue indica a condição de "nenhum pro :*rama 
carregado" . Por isto, após a carregamento do Bll-BASIC 
não haverá nenhum programa BASIC carregado). 

Recupera em REG-A a "Configuração Normal dos Bancos de 
Memória RDM/RAM, ai colocada pela Instrução 0030. 

Retorna a Configuração de memória ao Noi ma . 

1 Interpretador BAS I C ativo). 

RETORNA o controle ao Interpretador BASIC, com a rotina 
DESVIO interceptando e analisando antes dele os comandos 
por voc? teclados* 
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0£> — CARACTERES DE CONTROLE BASIC 


uma segunda 


Se vo tf estiver trabalhando com o BASIC é possível comandar 
algumas funções "Espec ia i s" de 41 Edição de Tela 1 * acionando a 
tecla' CTRL (CQNTRGL = CONTROLE) s imul taneamente a 
tecia gue indica qual a função a ser executada, 

Voc? pode acionar estas funções a partir de 
A5SEMBLER* utilizando a técnica descrita no item 
RET01). 

A seguir estão relacionadas as teclas 


um 

06 


Programa 
f Rot ina 


correspondentes i assim como os caracteres 
representam. 


hexadec ima is 


funções 
que as 


CTRL+fl 

(#01) 

CTRL+B 

(#02) 

CTRL+C 

(#03) 

CTRL+E 

(#05) 

CTRL+F 

(#06) 

CTRL+G 

(#07) 

CTRL+H 

(#08) 

CRTL+I 

(#09) 

CTRL+J 

(#0A ) 

CTRL+K 

(#0B> 

CTRL+L 

(#0C> 

CTRL+M 

(#QD ) 

CTRL+N 

(#0E> 

CTRL+R 

(#12) 

CTRL+U 

(#15) 

CTRL+X 

(#19) 

CTRL+C 

(#1B> 

CTRL+\ 

<#1C> 

CTRL+3 

( # 1 D ) 

CTRL+ A 

(#1E) 

CTRL+ 

<#1F) 


( #7F ) 


Indica que o caráter seguinte é "Gráfico 41 
Coloca o CURSOR no início da palavra anterior 
Encerra a condição de "Entrada de Dados 11 
Apaga a linha desde o CURSOR até o final 
Coloca o CURSOR no início da palavra seguinte 
Aciona a rotina BEEP (Alarme) do BIOS 
Retrocede em uma posição os caracteres da linha , 
desde o CURSOR até o último caráter (equivale ao 
pressionamento da tecla "Back-Space M ) 

Coloca o CURSOR na posição seguinte de TABULAÇÜD 
Coloca o CURSOR na linha seguinte ÍLINE FEED) 
Coloca o CURSOR na posição (1,1) da Tela 
Limpa a Tela e coloca o CURSOR na posição (1,1) 
(equivale ao acionamento da tecla "CLS/HOílE") 
Equivale ao pressionamento da tecla RETURN 
("Retorno do Carro 1 *) 

Coloca o CURSOR na última posição da linha 
Liga/Desliga o modo "Inserção* 1 (equivale ao 
pressionamento da tecla INS) 

'* Apaga" toda a linha sobre a qual está o CURSOR 

Equivale ao pressionamento da tecla SELECT 

Equivale ao pressionamento da tecla ESC 

Move o CURSOR uma posição para a Direita 

Move o CURSOR uma posição para a Esquerda 

Move o CURSOR uma linha para Cima 

Move o CURSOR uma linha para Baixo 

Apaga a letra que está sobre o CURSOR (equivale ao 

pressionamento da tecla DEL) 
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0E 

AOC 

MU) 

CB45 

BIT 

0,1 

DDffiOO 

ABC 

kAim 

CB4E 

BIT 

1,(HI 

FD6E00 

ADC 

A r üM> 

DDCBCG4E 

BIT 

i.lIÍHJ) 

BF 

ADC 

A, A 

FDCB004E 

BIT 

MMO! 

33 

m 

AiB 

CB4F 

BIT 

M 

89 

ADC 

AiC 

CB48 

BIT 

l,B 

m 

ADC 

A,D 

CB49 

BIT 

liC 

CEOO 

ADC 

M 

CB4A 

BIT 

1,D 

3B 

ADC 

A f E 

zm 

BIT 

1,£ 

BC 

ADC 

A,H 

' CB4C 

BIT 

1,H 

OD 

ADC 

A,L 

: CB4D 

BIT 

liL 

ÍM 

ADC 

HL.BC 

CB5è 

BIT 

2, (HL) 

ED5A 

ADC 

HL. DE 

DDCB0056 

BIT 

2,(114» 

FD6A 

ADC 

HLiH 

FDCB005Ò 

BIT 

3, ilV+O) 

ím 

ADC 

HL, SP 

C857 

BIT 

2, A 

% 

ACD 

MüJ 

CBS) 

BIT 

£,B 

DDSòOO 

ADE) 

MIM» 

CB51 

BIT 

2jC 

ÍD06Ü0 

ADD 

A,íl¥+0) 

CB58 

BIT 

2, D 

87 

ADD 

A, A 

CB53 

BIT 

B.E 

80 

add 

A,B 

CB54 

BIT 

2,H 

01 

ftDU 

A,C 

CB55 

BIT 

2,t 

82 

m 

A, D 

CB5E 

BIT 

3,1111 

C600 

ADD 

AtO 

D0CBOO5E 

BIT 

3,111+0) 

03 

m 

A>E 

FDCB005E 

BIT 

3,uy+o) 

84 

ADD 

A,M 

CB5F 

BIT 

3iA 

85 

ADD 

AiL 

CB56 

BIT 

3,B 

07 

ADD 

HL, BC 

CB59 

BIT 

3,C 

19 

ADD 

HL, DE 

m 

BIT 

3.0 

29 

ADD 

HL.HL 

CB5B 

BIT 

3,E 

39 

ADD 

HLjSF 

cbsc 

BIT 

3,H 

DD09 

ADD 

u,oc 

CB5D 

BIT 

3,1 

DD19 

ADD 

IXrDE 

í%ò 

BIT 

A, (HL) 

m 

ADD 

IX. IX 

DDCBOOÜ 

BIT 

4, (IÍ+OJ 

DD39 

ADD 

IX, SP 

FEJCB0046 

BIT 

MIY4I) 

FEX)9 

m 

IV, BC 

CB&7 

BIT 

A, A 

FDÍ9 

m 

IVf DE 

CB60 

BIT 

M 

TP29 

ADD 

IV, IV 

CBfil 

BIT 

W 

FD39 

ADD 

IV, SP 

zm 

BIT 

4, D 

Aò 

AND 

ÍHU 

CB63 

BIT 

w 

ODA4QO 

m 

111*01 

zm 

BIT 

M 

FDA6QQ 

m 

IIW) 

CB65 

BIT 

4,L 

A7 

AND 

A 

CB6E 

BIT 

5, (HL) 

ftO 

AND 

Ê 

DDCB006E 

BIT 

5,111+0) 

Al 

AND 

C 

FOCBQOòE 

BIT 

5,(IY+0) 

A£ 

AND 

B 

CB6F 

BIT 

5, A 

E600 

AND 

0 

CBÓ0 

BIT 

5,3 

A3 

AND 

E 

QBá9 

BIT 

5,C 

A4 

m 

H 

CB6A 

BIT 

5,0 

A5 

m 

L 

zm 

BIT 

5,E 

CB4à 

BIT 

0,1)0 

CBóC 

BIT 

5,H 

DDC8004È 

bit 

0,4 1JM) 

CB6D 

BIT 

5,L 

FflCBOM 

BIT 

0,UYH)l 

CB7à 

BIT 

4,(H! 

CB47 

BIT 

Of A 

DDCB0076 

BIT 

4,111+0) 

CB4C 

eu 

0,B 

FDCB0G7A 

BIT 

ó,ÜY+0) 

CB4Í 

BIT 

G,C 

CB77 

BIT 

4, A 

CB42 

BIT 

Of D 

CB70 

BIT 

6,8 

CB43 

BIT 

Oi í 

CB71 

BIT 

6,C 

zm 

BIT 

M 

CB72 

BIT 

4,0 


FB 

EI 


CB73 

BIT 

6,E 

E3 

EX 

tSFIjH 

CB74 

BIT 

É,H 

5DE3 

EI 

íSPJjII 

CB75 

BIT 

4,L 

FDÊ3 

DE 

ISPMY 

CB7E 

BIT 

7,(111 

08 

EX 

AF,r 

DDCB007E 

BIT 

7,(11+01 

EB 

DE 

DE,)i 

FDCB007E 

BIT 

7,(iY+0) 

09 

m 


CB7F 

BIT 

7, A 

76 

HALT 

CB7B 

BIT 

7,B 

ED4Ò 

w 

0 

CB79 

BIT 

7,C 

EC56 

in 

1 

C87A 

BIT 

7,0 

ED5E 

IN 

2 

CB7B 

BIT 

7,E 

ED78 

IN 

A,(C) 

CB7C 

BII 

7,H 

DBOC 

IN 

AtÍéOOÍ 

CB7D 

BIT 

7,L 

EM 

IN 

B,(Cí 

CDOOOÜ 

CALL 

#0000 

HM 

IN 

C,(C) 

DCÜOOO 

CALL 

C, 10000 

um 

IN 

D, 10 

FCOOOO 

CALL 

H, lOOOO 

zm 

IN 

Et tC) 

D40000 

CALL 

NC, 10000 

EDòO 

IN 

H,(C) 

C40000 

CALL 

NZ, 10000 

EDÓ8 

IN 

LtíCl 

F40OOO 

\AL 

P t *OOO0 

34 

INC 

m 

ECOÔOO 

CALL 

PEftOOOO 

DD340Q 

INC 

nm 

E40000 

CALL 

PO,tOf)0O 

FD3MXÍ 

INC 

ÜY+OÍ 

ccoooo 

CALL 

ZfiOOOO 

3C 

INC 

A 

3f 

CCf 


04 

INC 

B 

BE 

CP 

(HL) 

03 

INC 

BC 

DDBEOO 

CP 

UX+OI 

0C 

INC 

C 

FDBEOÕ 

CP 

ÜY+OÍ 

14 

INC 

0 

BF 

CP 

A 

13 

INC 

DE 

88 

CP 

B 

1C 

INC 

E 

B9 

CP 

C 

34 

m 

H 

BA 

CP 

D 

23 

INC 

HL 

FEK 

CP 

Ü 

DD83 

INC 

IX 

EB 

CP 

E 

m 

INC 

IV 

BC 

CP 

H 

BC 

INC 

L 

BD 

CP 

L 

33 

INC 

SP 

EDA9 

CFD 


ím 

IND 


m 

CFUR 

EPBA 

INDft 


EDA1 

CPI 


m 

INI 


EDB1 

CFIR 

£DEe 

INIR 


PF 

CPL 


E9 

JP 

ÍHU 

27 

DAA 


DDE? 

JP 

im 

35 

DEC 

m 

FDE? 

JP 

íIYí 

DD35G0 

DEC 

tlí+O) 

C3000G 

JP 

#0000 

FD350O 

DEC 

ltY+01 

DAÚOOO 

JP 

C,ÍOOOO 

3D 

DEC 

A 

rfiÜW 

JP 

N,»OCOO 

05 

DEC 

B 

D2CÜQ0 

JP 

NC,tO0OO 

OB 

DEC 

BC 


JP 

uz,mQ 

OD 

DEC 

C 

FEOÔOÜ 

JP 

P|«000 

15 

DEC 

D 

EAOO0O 

JP 

PE, 10000 

ÍB 

DEC 

DE 

EBOOOO 

JP 

PO, *0000 

10 

DEC 

E 

CAOOOÜ 

JP 

Z,IO0OO 

85 

DEC 

H 

38FE 

JR 

C>$+0 

2B 

DEC 

HL 

10FE 

JR 

t+0 

WEB 

DEC 

n 

30FE 

JR 

fC,i+0 

FD2B 

DEC 

IV 

BOFE 

JR 

IC,W 

2D 

DEC 

L 

28FI 

JR 

Z,í+0 

3B 

DEC 

SP 

320000 

LD 

(tOOOO)iA 

F3 

Dl 


ED430CW 

LD 

(*O0ÚO),£C 

10FE 

mi í+o 
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EDS3000Ü 

0 

(fOOO).DE 

ED4BOOOO 0 

BC, (10000) 

®oooo 

0 

110000), H 

010000 

0 

BC, «0 

DD220000 

0 

( 100001,1)1 

4£ 

0 

C, (EL) 

iimm 

0 

(tOOOOMY 

DD4E0G 

0 

C, (11+01 

0)730000 

0 

! 100001 ,SP 

fD4EQ0 

0 

C,UY+0) 

Gc 

LD 

(BC), A 

4F 

0 

C,A 

ie 

0 

(DE), A 

48 

0 

C.B 

77 

LD 

(HL), A 

49 

0 

c,c 

70 

LD 

(HL),B 

4A 

0 

C,B 

71 

0 

(HL)iC 

OEOO 

! 0 

C,0 

72 

0 

(HM 

4B 

:u> 

M 

3600 

LD 

(HLI)O 

4C 

0 

C,H 

73 

0 

(HU.E 

4D 

0 

C.L 

74 

0 

(HU,h 

56 

0 

D, (Hl 

75 

LD 

(H),L 

DD56O0 

0 

D.IUMH 

DDT700 

0 

(IÍ+OUA 

05600 

0 

D,(IY+0) 

DD7000 

0 

UWI,B 

57 

,0 

D, A 

DU7100 

0 

(IÍ+OM 

50 

10 

D,B 

DDTEüO 

0 

(IÍ+OM 

51 

iu» 

D.C 

DD340G00 

0 

m+01,0 

52 

0 

D, D 

BD730G 

LD 

U1+0),E 

1600 

0 

D,0 

mm 

LD 

(U+0),H 

53 

0 

DjE 

DD75Q0 

LD 

(II+0),L 

54 

0 

D,H 

FD77O0 

0 

IIY+QI,A 

55 

0 

D,L 

FD7000 

0 

m+ou 

EB5BOOOO LD 

DE, (#0000) 

FD7100 

0 

(IY+01.C 

IlOOOO 

0 

DE, 10000 

FD7E00 

0 

(IY+0M 

5E 

0 

E,(H) 

FD36000Q 

0 

UY*0),0 

ED5E00 

0 

E.III+O) 

FD730O 

0 

(IY+0),E 

FD5E00 

0 

E,(IY+0) 

FD7400 

0 

í.nK)) t H 

5f 

LD 

E,A 

FD7500 

0 

(l¥+0),L 

58 

0 

E,B 

3AÜOQO 

0 

A,(t0000l 

59 

0 

E,C 

GA 

LD 

A, (BC) 

5A 

LD 

E,D 

IA 

0 

A, (DE) 

1E00 

0 

£,0 

TE 

LD 

A, (Hl 

5B 

0 

E,E 

DD7E00 

0 

A,m+0) 

5C 

LD 

E,H 

FD7E00 

0 

A, ÍIY+O) 

5D 

0 

E,L 

TF 

0 

A, A 

66 

0 

H.iHI 

TB 

0 

A,B 

DD6600 

0 

HiüIKI) 

79 

LD 

A,C 

FD660Ü 

0 

H,(1Y*0) 

7A 

0 

A,D 

67 

0 

H,A 

3E00 

0 

A,0 

60 

0 

M,B 

7B 

LD 

A,E 

61 

0 

H,C 

TC 

LD 

A,H 

62 

0 

H,D 

057 

0 

A,1 

2600 

0 

H,0 

7D 

0 

A,L 

63 

0 

H,E 

ED5F 

0 

A,R 

64 

0 

H,H 

46 

LD 

B,(HLI 

65 

0 

H,L 

mm 

0 

B, 111*01 

2AOOOO 

0 

11,(100001 

FD4600 

0 

B.IIY+O) 

210000 

0 

HL, 10000 

47 

0 

0, A 

ED47 

0 

1,A 

40 

LD 

B,B 

DD2AOOOO 0 

11,(10000) 

41 

LD 

BiC 

DD21DOOO 0 

ll.MOOO 

42 

LD 

8,0 

FD2AOOOO 0 

IY,(tOOOOi 

0600 

LD 

B,0 

FD210000 LD 

lYiltOOOO 

43 

LD 

B,E 

6F 

0 

L, A 

44 

LD 

B,H 

68 

0 

L,B 

45 

0 

B,L 

69 

0 

L,C 


165 


6A 

0 

ItD 

CBS? 

RES 

0,A 

2E00 

0 

L?0 

CE80 

RES 

0,B 

o,c 

òB 

0 

LíE 

CBB1 

RES 

AE 

0 

L,tHl 

CE® 

RES 

0,8 

DDàCOO 

0 

L,UW1 

CBS3 

RES 

0,E 

0,H 

FD6E00 

0 

itiim 

094 

RES 

6C 

0 

LjM 

CÊ95 

RES 

0,L 

6D 

0 

LjL 

CE8E 

RES 

i,ÜL) 

ED4F 

0 

R,A 

DCCBOOBE 

RES 

1,(11+01 

EÜ7BOOOO 

0 

5P,ÍIOOOOí 

FDCBOOGE 

RES 

Uüy+O) 

310000 

0 

SP,#00 

CBOF 

RES 

1,A 

F9 

0 

5P|H 

CB88 

RES 

UB 

m 

0 

SPjH 

CES9 

RES 

1,C 

PDF? 

0 

SP,IY 

CECA 

RES 

UD 

EDAfl 

0D 


CBBfi 

RES 

UE 

.EDB8 

0DR 


ceee 

RES 

UH 

EDAO 

01 


CB8D 

RES 

UL 

EDBG 

LDIR 


C896 

RES 

a,(ni 

:ED44 

NE6 


DDC&0O96 

RES 

2,(11+01 

00 

NQP 


Mimh 

RES 

2.UY+0) 

16 

QR 

m 

cm 

RES 

2, A 

DDB40G 

QR 

UX+01 

CB9Q 

RE5 

2,B 

FDB600 

GR 

IIY+O) 

GB91 

RES 

2,C 

B7 

GR 

A 

C&92 

RES 

2,0 

BO 

OR 

B 

CB93 

RES 

e.E 

BI 

GR 

C 

CB94 

RES 

2,H 

82 

QR 

D 

C295 

RES 

2,L 

F600 

QR 

0 

CB9E 

RES 

3, (HL) 

B3 

OR 

E 

DDCB009E 

RES 

3,IIWS 

D4 

QR 

8 

FDCB009E 

RES 

3,UY+0) 

B5 

OR 

L 

CB9F 

RES 

3, A 

EDEB 

OTDft 


CS9& 

RES 

3,8 

EDfi3 

OTIR 


099 

RES 

3,C 

079 

QUT 

íCI,A 

CB9A 

RES 

3, D 

ED41 

QUT 

SC)|B 

CB9B 

FES 

3,E 

ED49 

OUF 

ÍP,C 

CB9C 

RES 

3,H 

ED51 

CUT 

(CljD 

CB9D 

RES 

3,L 

ED59 

OQT 

(C),E 

CBA6 

RES 

A, (Hl 

ED61 

OüT 

(U,H 

DDCB00A6 

RES 

4,111+0) 

ED69 

OÜT 

<Cl t L 

FDCB0ÕA6 

RES 

4,(iY+0) 

D3Ô0 

OLFT 

(tOOM 

CÈA7 

RES 

4, A 

EDflB 

OUTD 

CBAO 

RES 

4,B 

EDA3 

GUTI 


CBA1 

m 

4>C 

F1 

m 

AF 

CBfiê 

RES 

4, D 

Cl 

POP 

BC 

CBA3 

RES 

4,E 

Dl 

PGP 

DE 

CBA4 

RES 

4.H 

0 

POP 

HL 

CBA5 

RES 

4,L 

DDE1 

POP 

n 

CBAE 

RES 

5,(H) 

FDÉ1 

0P 

IY 

DDC&OOAE 

RES 

5,(11+01 

F5 

PUSH AT 

FOCBOOAE 

IÍS 

5,(IY+0) 

C5 

PUSHBC 

CBflF 

RES 

5, A 

D5 

PUSH DÊ 

CBAB 

RES 

5,B 

E5 

PUSH H. 

CBA9 

FES 

5,C 

DDE5 

FUSH II 

zm 

RES 

5, D 

FDE5 

PUSH IY 

CBAB 

RES 

5,E 

CB36 

RES 

0,lli) 

CBAC 

RES 

5.H 

ÜDCB0086 

RES 

0,111+01 

c m 

RES 

5,L 

FDCB0086 

RES 

0,(lY+0) 

\ cm 

RES 

i,(H) 
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6ò 



RES 6,0X40) 

CEI9 

ffi 

C 

ÍEíBO 0Ô6 

RES oíÍITíOí ; 

CB1A 

Hfl 

0 

C£»7 

RES 6tA 

CB1B 

RR 

E 

CEBO 

1ÍS M 

CB1C 

a? 

H 

CBQ1 

RES W 

CB1B 

a? 

L 

C® 

RES á,D 

1F 

fEA 


CBÊ3 

RES 6,E 

me 

RRC 

(a) 

CE» 

F£S 6iM 

BÜCBOOOE 

RRC 

IIMI 

CE05 

RES A,L 

nraoooE 

RRC 

nm 

EEK; 

ííS 7,(Ht 

CBOf 

RRC 

A 

DDTBOOBE 

fi£5 7,0X401 

csce 

ac 

S 

FDCÍ3Ú8E 

RES 7,(IWÍ 

CBO? 

RRC 

c 

CBBF 

fiES 7, A 

WA 

RRC 

D 

CBES 

RES 7,B 

CBOS 

ac 

E 

im 

RES 7jC 

CROC 

ac 

H 

am 

RES 7 t B 

SOI 

ac 

L 

CBBB 

RES 7jE 

OF 

3CA 


CEÊC 

RES ?ití 

0567 

RS 


zm 

RES 7,1 

C7 

RST 

100 

ut 

RET 

CF 

RST 
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LANCA ESTA GRAN- 
DE NOVIDADE PARA 
' O SEU MSX: 

BIT-BASIC 
( Livro + Software) 


está o livro que explica deta- 
nstruçáo por instrução, 
Software Bit-Basic com que você 


faz alguns "milagres'';.. ; i r- 7 -j ■ 
^Jovos e interessantíssimos coman- 
do s! <riistagem controlada de pro- 
qrarrjas < còpia/movimentação de li- 
nhas • busca de constantes • dois 
programas carregados (com possibili- 
dades de "união" sem "misturar" as 
linhas). 

Basic com "Sintaxe Simplificada "! 
Programas Basic "de uma linha" 
"'íp reviamente carregados! • programas 
utilitários, acionados com sintaxe 
simplificada (sem necessidade de car- 




ga a partir de fita/disquete), inclusive 

rvi ri jTMTn rVi IVí I 


programas criados por você mesmo! 

com o Interpretador 
itegralmente e simultânea- 
sponível ! 

E mais: 

Você também vaí aprender 
mágica! 0 livro ensina como 





essa 
inter- 
ceptar o Basic e alguns de seus miste- 
riosos segredos. O Bit-Basic é uma ra 
ridade, pois é um Software "aberto"' 
ao usuário e completamente docu- 
mentado] 

Você não conhece ASSEMBLER? 
Não tem problema! Este livro, que 
acompanha o Software Bit-Basic, 
explica o funcíonamenfo do Z-80 e 
de sua "linguagem" {o Assembler 
Z-80) de maneira simples e objetiva, 
utilizando, para isso, os seus próprios 
conhecimentos do Basic! 

BIT BASfC 
UM SOFTWARE 
INTEIRAMENTE NACIONAL 




